/*!	 workarea.cpp
**	 Work area
**
**	Copyright (c) 2002-2005 Robert B. Quattlebaum Jr., Adrian Bentley
**	Copyright (c) 2006 Yue Shi Lai
**	Copyright (c) 2007, 2008 Chris Moore
**	Copyright (c) 2011 Nikita Kitaev
**	Copyright (c) 2016 caryoscelus
**
**	This package is free software; you can redistribute it and/or
**	modify it under the terms of the GNU General Public License as
**	published by the Free Software Foundation; either version 2 of
**	the License, or (at your option) any later version.
**
**	This package is distributed in the hope that it will be useful,
**	but WITHOUT ANY WARRANTY; without even the implied warranty of
**	MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
**	General Public License for more details.
**
*/

#ifdef USING_PCH
#	include "pch.h"
#else
#ifdef HAVE_CONFIG_H
#	include <config.h>
#endif

#include <cmath>

#include <gtkmm/arrow.h>
#include <gtkmm/frame.h>
#include <gtkmm/scrollbar.h>
#include <gtkmm/window.h>

#include <ETL/misc>

#include <synfig/general.h>

#include <synfig/blinepoint.h>
#include <synfig/context.h>
#include <synfig/distance.h>
#include <synfig/debug/debugsurface.h>
#include <synfig/mutex.h>
#include <synfig/rendering/renderer.h>
#include <synfig/surface.h>
#include <synfig/target_scanline.h>
#include <synfig/target_tile.h>
#include <synfig/target_cairo.h>
#include <synfig/target_cairo_tile.h>
#include <synfig/valuenodes/valuenode_composite.h>

#include <synfigapp/canvasinterface.h>

#include <gui/localization.h>

#include "asyncrenderer.h"
#include "canvasview.h"
#include "event_mouse.h"
#include "event_layerclick.h"
#include "event_keyboard.h"
#include "widgets/widget_color.h"
#include "workarea.h"
#include "workarearenderer/workarearenderer.h"
#include "workarearenderer/renderer_background.h"
#include "workarearenderer/renderer_canvas.h"
#include "workarearenderer/renderer_grid.h"
#include "workarearenderer/renderer_guides.h"
#include "workarearenderer/renderer_timecode.h"
#include "workarearenderer/renderer_bonesetup.h"
#include "workarearenderer/renderer_ducks.h"
#include "workarearenderer/renderer_dragbox.h"
#include "workarearenderer/renderer_bbox.h"

#endif

using namespace std;
using namespace etl;
using namespace synfig;
using namespace studio;

#ifndef stratof
#define stratof(X) (atof((X).c_str()))
#define stratoi(X) (atoi((X).c_str()))
#endif

class studio::WorkAreaTarget : public synfig::Target_Tile
{
public:
    WorkArea *workarea;
    int w, h;
    int real_tile_w, real_tile_h;
    int max_tile_w, max_tile_h;
    bool force_fullframe;

    int refresh_id;

    bool onionskin;
    bool onion_first_tile;
    int onion_layers;

    std::list<synfig::Time> onion_skin_queue;

    std::vector<RectInt> tiles_queue;

    synfig::Mutex mutex;

    void set_onion_skin(bool x, int *onions)
    {
        onionskin = x;

        Time time(rend_desc().get_time_start());

        if (!onionskin) {
            return;
        }

        onion_skin_queue.push_back(time);

        try {
            Time thistime = time;

            for (int i = 0; i < onions[0]; i++) {
                Time keytime = get_canvas()->keyframe_list().find_prev(thistime)->get_time();
                onion_skin_queue.push_back(keytime);
                thistime = keytime;
            }
        } catch (...)
        {  }

        try {
            Time thistime = time;

            for (int i = 0; i < onions[1]; i++) {
                Time keytime = get_canvas()->keyframe_list().find_next(thistime)->get_time();
                onion_skin_queue.push_back(keytime);
                thistime = keytime;
            }
        } catch (...)
        {  }

        onion_layers = onion_skin_queue.size();

        onion_first_tile = false;
    }
public:

    WorkAreaTarget(WorkArea *workarea, int w, int h, int max_tile_w, int max_tile_h, bool force_fullframe):
        workarea(workarea),
        w(w),
        h(h),
        real_tile_w(workarea->get_tile_w()),
        real_tile_h(workarea->get_tile_h()),
        force_fullframe(force_fullframe),
        max_tile_w(max_tile_w),
        max_tile_h(max_tile_h),
        refresh_id(workarea->get_refreshes()),
        onionskin(false),
        onion_first_tile(),
        onion_layers(0)
    {
        set_clipping(true);
        set_tile_w(workarea->tile_w);
        set_tile_h(workarea->tile_h);
        set_canvas(workarea->get_canvas());
        set_quality(workarea->get_quality());
    }

    ~WorkAreaTarget()
    {
        workarea->queue_draw();
    }

    virtual bool set_rend_desc(synfig::RendDesc *newdesc)
    {
        assert(workarea);
        newdesc->set_flags(RendDesc::PX_ASPECT | RendDesc::IM_SPAN);
        newdesc->set_wh(w, h);

        if (workarea->get_w() != w
                || workarea->get_h() != h) {
            workarea->set_wh(w, h, 4);
        }

        workarea->full_frame = false;
        desc = *newdesc;

        return true;
    }

    virtual int next_frame(Time& time)
    {
        synfig::Mutex::Lock lock(mutex);

        RectInt window_rect = workarea->get_window_rect(get_tile_w(), get_tile_h());

        if (force_fullframe) {
            tiles_queue.clear();
            tiles_queue.push_back(window_rect);
        } else {
            workarea->get_tile_book().get_dirty_rects(
                tiles_queue,
                refresh_id - onion_skin_queue.size(),
                window_rect,
                VectorInt(max_tile_w, max_tile_h));
        }

        if (!onionskin) {
            return synfig::Target_Tile::next_frame(time);
        }

        onion_first_tile = (onion_layers == (signed)onion_skin_queue.size());

        if (!onion_skin_queue.empty()) {
            time = onion_skin_queue.front();
            onion_skin_queue.pop_front();
        } else {
            return 0;
        }

        return onion_skin_queue.size() + 1;
    }

    virtual int next_tile(RectInt &rect)
    {
        synfig::Mutex::Lock lock(mutex);

        if (tiles_queue.empty()) {
            return 0;
        }

        rect = tiles_queue.back();
        tiles_queue.pop_back();
        return (int)tiles_queue.size() + 1;
    }

    virtual bool start_frame(synfig::ProgressCallback */*cb*/)
    {
        return true;
    }

    static void free_buff(const guint8 *x)
    {
        free(const_cast<guint8*>(x));
    }

    virtual bool add_tile(const synfig::Surface &surface, int x, int y)
    {
        synfig::Mutex::Lock lock(mutex);
        assert(surface);

        PixelFormat pf(PF_RGB | PF_A);

        const int total_bytes(surface.get_w()*surface.get_h()*synfig::channels(pf));

        unsigned char *buffer((unsigned char*)malloc(total_bytes));

        if (!surface || !buffer) {
            return false;
        }

        {
            unsigned char *dest(buffer);
            const Color *src(surface[0]);
            int w(surface.get_w());
            int x(w * surface.get_h());

            for (int i = 0; i < x; i++)
                dest = Color2PixelFormat(
                           (*(src++)).clamped(),
                           pf,
                           dest,
                           App::gamma
                       );
        }

        Glib::RefPtr<Gdk::Pixbuf> pixbuf;

        pixbuf = Gdk::Pixbuf::create_from_data(
                     buffer,	// pointer to the data
                     Gdk::COLORSPACE_RGB, // the colorspace
                     ((pf & PF_A) == PF_A), // has alpha?
                     8, // bits per sample
                     surface.get_w(),	// width
                     surface.get_h(),	// height
                     surface.get_w() * synfig::channels(pf), // stride (pitch)
                     sigc::ptr_fun(&WorkAreaTarget::free_buff)
                 );

        RectInt rect(x, y, x + pixbuf->get_width(), y + pixbuf->get_height());
        WorkAreaTile *tile = workarea->get_tile_book().find_tile(refresh_id - onion_skin_queue.size() - 1, rect);

        if (!onionskin || onion_first_tile || !tile || !tile->pixbuf) {
            workarea->get_tile_book().add(refresh_id - onion_skin_queue.size(), x, y, pixbuf);
        } else {
            pixbuf->composite(
                tile->pixbuf, // Dest
                0,// int dest_x
                0,// int dest_y
                pixbuf->get_width(), // dest width
                pixbuf->get_height(), // dest_height,
                0, // double offset_x
                0, // double offset_y
                1, // double scale_x
                1, // double scale_y
                Gdk::INTERP_NEAREST, // interp
                255 / (onion_layers - onion_skin_queue.size() + 1) // int overall_alpha
            );
            tile->refresh_id = refresh_id - onion_skin_queue.size();
            workarea->get_tile_book().sort();
        }

        workarea->queue_draw();
        return true;
    }

    virtual void end_frame()
    {
    }
};

class studio::WorkAreaTarget_Full : public synfig::Target_Scanline
{
public:
    WorkArea *workarea;
    int w, h;
    int real_tile_w, real_tile_h;

    int refresh_id;

    bool onionskin;
    bool onion_first_tile;
    int onion_layers;

    Surface surface;

    std::list<synfig::Time> onion_skin_queue;

    void set_onion_skin(bool x, int *onions)
    {
        onionskin = x;

        Time time(rend_desc().get_time_start());

        if (!onionskin) {
            return;
        }

        onion_skin_queue.push_back(time);

        try {
            Time thistime = time;

            for (int i = 0; i < onions[0]; i++) {
                Time keytime = get_canvas()->keyframe_list().find_prev(thistime)->get_time();
                onion_skin_queue.push_back(keytime);
                thistime = keytime;
            }
        } catch (...)
        {  }

        try {
            Time thistime = time;

            for (int i = 0; i < onions[1]; i++) {
                Time keytime = get_canvas()->keyframe_list().find_next(thistime)->get_time();
                onion_skin_queue.push_back(keytime);
                thistime = keytime;
            }
        } catch (...)
        {  }

        onion_layers = onion_skin_queue.size();

        onion_first_tile = false;
    }
public:

    WorkAreaTarget_Full(WorkArea *workarea, int w, int h):
        workarea(workarea),
        w(w),
        h(h),
        real_tile_w(),
        real_tile_h(),
        refresh_id(workarea->refreshes),
        onionskin(false),
        onion_first_tile(),
        onion_layers(0)
    {
        set_canvas(workarea->get_canvas());
        set_quality(workarea->get_quality());
    }

    ~WorkAreaTarget_Full()
    { }

    virtual bool set_rend_desc(synfig::RendDesc *newdesc)
    {
        assert(workarea);
        newdesc->set_flags(RendDesc::PX_ASPECT | RendDesc::IM_SPAN);
        newdesc->set_wh(w, h);

        if (workarea->get_w() != w ||	workarea->get_h() != h) {
            workarea->set_wh(w, h, 4);
        }

        surface.set_wh(newdesc->get_w(), newdesc->get_h());
        desc = *newdesc;
        workarea->full_frame = true;
        return true;
    }

    virtual int next_frame(Time& time)
    {
        if (!onionskin) {
            return synfig::Target_Scanline::next_frame(time);
        }

        onion_first_tile = (onion_layers == (signed)onion_skin_queue.size());

        if (!onion_skin_queue.empty()) {
            time = onion_skin_queue.front();
            onion_skin_queue.pop_front();
        } else {
            return 0;
        }

        return onion_skin_queue.size() + 1;
    }

    virtual bool start_frame(synfig::ProgressCallback */*cb*/)
    {
        return true;
    }

    virtual Color * start_scanline(int scanline)
    {
        return surface[scanline];
    }

    virtual bool end_scanline()
    {
        return true;
    }

    static void free_buff(const guint8 *x)
    {
        free(const_cast<guint8*>(x));
    }

    virtual void end_frame()
    {
        assert(surface);

        PixelFormat pf(PF_RGB | PF_A);

        const int total_bytes(surface.get_w()*surface.get_h()*synfig::channels(pf));

        unsigned char *buffer((unsigned char*)malloc(total_bytes));

        if (!surface || !buffer) {
            return;
        }

        // Copy the content of surface to the buffer
        {
            unsigned char *dest(buffer);
            const Color *src(surface[0]);
            int w(surface.get_w());
            int x(w * surface.get_h());

            for (int i = 0; i < x; i++)
                dest = Color2PixelFormat(
                           (*(src++)).clamped(),
                           pf,
                           dest,
                           App::gamma
                       );
        }

        Glib::RefPtr<Gdk::Pixbuf> pixbuf;

        pixbuf = Gdk::Pixbuf::create_from_data(
                     buffer,	// pointer to the data
                     Gdk::COLORSPACE_RGB, // the colorspace
                     ((pf & PF_A) == PF_A), // has alpha?
                     8, // bits per sample
                     surface.get_w(),	// width
                     surface.get_h(),	// height
                     surface.get_w() * synfig::channels(pf), // stride (pitch)
                     sigc::ptr_fun(&WorkAreaTarget::free_buff)
                 );

        RectInt rect(0, 0, pixbuf->get_width(), pixbuf->get_height());
        WorkAreaTile *tile = workarea->get_tile_book().find_tile(refresh_id - onion_skin_queue.size() - 1, rect);

        if (!onionskin || onion_first_tile || !tile || !tile->pixbuf) {
            workarea->get_tile_book().add(refresh_id - onion_skin_queue.size(), 0, 0, pixbuf);
        } else {
            pixbuf->composite(
                tile->pixbuf, // Dest
                0,// int dest_x
                0,// int dest_y
                pixbuf->get_width(), // dest width
                pixbuf->get_height(), // dest_height,
                0, // double offset_x
                0, // double offset_y
                1, // double scale_x
                1, // double scale_y
                Gdk::INTERP_NEAREST, // interp
                255 / (onion_layers - onion_skin_queue.size() + 1) // int overall_alpha
            );
            tile->refresh_id = refresh_id - onion_skin_queue.size();
            workarea->get_tile_book().sort();
        }

        workarea->queue_draw();
    }
};

WorkAreaTile*
WorkAreaTileBook::find_tile(int refresh_id, const synfig::RectInt &rect)
{
    for (WorkAreaTile::List::iterator i = tiles.begin(); i != tiles.end(); ++i)
        if (i->refresh_id >= refresh_id && i->rect == rect) {
            return &*i;
        }

    return NULL;
}

void
WorkAreaTileBook::sort()
{
    tiles.sort();

    for (WorkAreaTile::List::iterator i = tiles.begin(); i != tiles.end(); ++i)
        for (WorkAreaTile::List::iterator j = tiles.begin(); j != i;)
            if (j->refresh_id < i->refresh_id && etl::intersect(i->rect, j->rect)) {
                WorkAreaTile::List::iterator k = j;
                ++j;
                tiles.erase(k);
            } else {
                ++j;
            }
}

void
WorkAreaTileBook::add(const WorkAreaTile &tile)
{
    if (!tile.rect.valid() || !tile.pixbuf) {
        return;
    }

    tiles.push_back(tile);
    sort();
}

void
WorkAreaTileBook::get_dirty_rects(
    std::vector<synfig::RectInt> &out_rects,
    int refresh_id,
    const synfig::RectInt &bounds,
    const synfig::VectorInt &max_size) const
{
    out_rects.clear();

    if (!bounds.valid()) {
        return;
    }

    out_rects.push_back(bounds);
    std::vector<synfig::RectInt> subs;
    subs.reserve(4);

    // remove updated rects
    for (WorkAreaTile::List::const_iterator i = tiles.begin(); i != tiles.end(); ++i) {
        assert(i->rect.valid());

        if (i->refresh_id >= refresh_id) {
            for (std::vector<synfig::RectInt>::iterator j = out_rects.begin(); j != out_rects.end();) {
                assert(j->valid());
                RectInt rect = *j;
                etl::set_intersect(rect, rect, i->rect);

                if (rect.valid()) {
                    subs.clear();

                    if (rect.minx != j->minx) {
                        subs.push_back(RectInt(j->minx, j->miny, rect.minx, j->maxy));
                    }

                    if (rect.maxx != j->maxx) {
                        subs.push_back(RectInt(rect.maxx, j->miny, j->maxx, j->maxy));
                    }

                    if (rect.miny != j->miny) {
                        subs.push_back(RectInt(rect.minx, j->miny, rect.maxx, rect.miny));
                    }

                    if (rect.maxy != j->maxy) {
                        subs.push_back(RectInt(rect.minx, rect.maxy, rect.maxx, j->maxy));
                    }

                    if (subs.empty()) {
                        j = out_rects.erase(j);
                    } else {
                        *j = subs.front();
                        int index = j - out_rects.begin();
                        out_rects.insert(j + 1, subs.begin() + 1, subs.end());
                        j = out_rects.begin() + index + subs.size();
                    }
                } else {
                    ++j;
                }
            }
        }
    }

    // merge rects
    for (int i = 0; i < (int)out_rects.size(); ++i) {
        RectInt &r = out_rects[i];

        for (std::vector<synfig::RectInt>::iterator j = out_rects.begin(); j != out_rects.end();) {
            bool remove = false;

            if (r.minx == j->minx && r.maxx == j->maxx && r.maxy == j->miny) {
                r.maxy = j->maxy;
                remove = true;
            }

            if (r.minx == j->minx && r.maxx == j->maxx && r.miny == j->maxy) {
                r.miny = j->miny;
                remove = true;
            }

            if (r.miny == j->miny && r.maxy == j->maxy && r.maxx == j->minx) {
                r.maxx = j->maxx;
                remove = true;
            }

            if (r.miny == j->miny && r.maxy == j->maxy && r.minx == j->maxx) {
                r.minx = j->minx;
                remove = true;
            }

            if (remove) {
                j = out_rects.erase(j);
            } else {
                ++j;
            }
        }
    }

    // split large rects
    for (std::vector<synfig::RectInt>::iterator j = out_rects.begin(); j != out_rects.end();) {
        assert(j->valid());

        if (j->maxx - j->minx > max_size[0]) {
            j = out_rects.insert(j + 1, RectInt(j->minx + max_size[0], j->miny, j->maxx, j->maxy));
            (j - 1)->maxx = j->minx;
            --j;
        } else if (j->maxy - j->miny > max_size[1]) {
            j = out_rects.insert(j + 1, RectInt(j->minx, j->miny + max_size[1], j->maxx, j->maxy));
            (j - 1)->maxy = j->miny;
            --j;
        } else {
            ++j;
        }
    }
}

WorkArea::WorkArea(etl::loose_handle<synfigapp::CanvasInterface> canvas_interface):
    Gtk::Table(3, 3, false), /* 3 columns by 3 rows*/
    Duckmatic(canvas_interface),
    canvas_interface(canvas_interface),
    canvas(canvas_interface->get_canvas()),
    scrollx_adjustment(Gtk::Adjustment::create(0, -4, 4, 0.01, 0.1)),
    scrolly_adjustment(Gtk::Adjustment::create(0, -4, 4, 0.01, 0.1)),
    w(TILE_SIZE),
    h(TILE_SIZE),
    last_event_time(0),
    progresscallback(0),
    dragging(DRAG_NONE),
    show_grid(false),
    background_size(15, 15),
    background_first_color(0.88, 0.88, 0.88),  /* light gray */
    background_second_color(0.65, 0.65, 0.65),  /* dark gray */
    jack_offset(0),
    tile_w(TILE_SIZE),
    tile_h(TILE_SIZE),
    timecode_width(0),
    timecode_height(0),
    bonesetup_width(0),
    bonesetup_height(0)
{
    show_guides = true;
    curr_input_device = 0;
    full_frame = false;
    allow_duck_clicks = true;
    allow_bezier_clicks = true;
    allow_layer_clicks = true;
    render_idle_func_id = 0;
    quality = 10;
    low_res_pixel_size = 2;
    rendering = false;
    canceled_ = false;
    low_resolution = false;
    pw = 0.001;
    ph = 0.001;
    last_focus_point = Point(0, 0);
    onion_skin = false;
    onion_skins[0] = 1;
    onion_skins[1] = 0;
    queued = false;
    dirty_trap_enabled = false;
    solid_lines = true;

    dirty_trap_queued = 0;

    meta_data_lock = false;

    insert_renderer(new Renderer_Background, 000);
    insert_renderer(new Renderer_Canvas,     010);
    insert_renderer(new Renderer_Grid,       100);
    insert_renderer(new Renderer_Guides,     200);
    insert_renderer(new Renderer_Ducks,      300);
    insert_renderer(new Renderer_BBox,       399);
    insert_renderer(new Renderer_Dragbox,    400);
    insert_renderer(new Renderer_Timecode,   500);
    insert_renderer(new Renderer_BoneSetup,  501);

    signal_duck_selection_changed().connect(sigc::mem_fun(*this, &studio::WorkArea::queue_draw));
    signal_duck_selection_single().connect(sigc::mem_fun(*this, &studio::WorkArea::on_duck_selection_single));
    signal_strokes_changed().connect(sigc::mem_fun(*this, &studio::WorkArea::queue_draw));
    signal_grid_changed().connect(sigc::mem_fun(*this, &studio::WorkArea::queue_draw));
    signal_grid_changed().connect(sigc::mem_fun(*this, &studio::WorkArea::save_meta_data));
    signal_sketch_saved().connect(sigc::mem_fun(*this, &studio::WorkArea::save_meta_data));

    // Not that it really makes a difference... (setting this to zero, that is)
    refreshes = 0;

    drawing_area = manage(new class Gtk::DrawingArea());
    drawing_area->add_events(Gdk::SCROLL_MASK | Gdk::BUTTON3_MOTION_MASK);
    drawing_area->show();

    drawing_frame = manage(new Gtk::Frame);
    drawing_frame->add(*drawing_area);


    drawing_frame->show();

    attach(*drawing_frame, 1, 2, 1, 2, Gtk::EXPAND | Gtk::FILL, Gtk::EXPAND | Gtk::FILL, 0, 0);

    Gtk::IconSize iconsize = Gtk::IconSize::from_name("synfig-small_icon");

    // Create the vertical and horizontal rulers
    vruler = manage(new Widget_Ruler(true));
    hruler = manage(new Widget_Ruler(false));
    vruler->show();
    hruler->show();
    attach(*vruler, 0, 1, 1, 2, Gtk::SHRINK | Gtk::FILL, Gtk::EXPAND | Gtk::FILL, 0, 0);
    attach(*hruler, 1, 2, 0, 1, Gtk::EXPAND | Gtk::FILL, Gtk::SHRINK | Gtk::FILL, 0, 0);
    hruler->signal_event().connect(sigc::mem_fun(*this, &WorkArea::on_hruler_event));
    vruler->signal_event().connect(sigc::mem_fun(*this, &WorkArea::on_vruler_event));
    hruler->add_events(Gdk::BUTTON1_MOTION_MASK | Gdk::BUTTON2_MOTION_MASK | Gdk::BUTTON_PRESS_MASK | Gdk::BUTTON_RELEASE_MASK | Gdk::POINTER_MOTION_MASK);
    vruler->add_events(Gdk::BUTTON1_MOTION_MASK | Gdk::BUTTON2_MOTION_MASK | Gdk::BUTTON_PRESS_MASK | Gdk::BUTTON_RELEASE_MASK | Gdk::POINTER_MOTION_MASK);

    // Create the menu button
    Gtk::Arrow *menubutton = manage(new Gtk::Arrow(Gtk::ARROW_RIGHT, Gtk::SHADOW_OUT));
    menubutton->set_size_request(18, 18);
    Gtk::EventBox *menubutton_box = manage(new Gtk::EventBox());
    menubutton_box->add(*menubutton);
    menubutton_box->add_events(Gdk::BUTTON_RELEASE_MASK);
    menubutton_box->signal_button_release_event().connect(
        sigc::bind_return(
            sigc::hide(
                sigc::mem_fun(*this, &WorkArea::popup_menu)), true));
    menubutton_box->show_all();
    attach(*menubutton_box, 0, 1, 0, 1, Gtk::SHRINK, Gtk::SHRINK, 0, 0);

    Gtk::HBox *hbox = manage(new class Gtk::HBox(false, 0));

    Gtk::VScrollbar *vscrollbar1 = manage(new class Gtk::VScrollbar(get_scrolly_adjustment()));
    Gtk::HScrollbar *hscrollbar1 = manage(new class Gtk::HScrollbar(get_scrollx_adjustment()));
    vscrollbar1->show();
    attach(*vscrollbar1, 2, 3, 1, 2, Gtk::FILL, Gtk::EXPAND | Gtk::FILL, 0, 0);

    zoomdial = manage(new class ZoomDial(iconsize));
    zoomdial->signal_zoom_in().connect(sigc::mem_fun(*this, &studio::WorkArea::zoom_in));
    zoomdial->signal_zoom_out().connect(sigc::mem_fun(*this, &studio::WorkArea::zoom_out));
    zoomdial->signal_zoom_fit().connect(sigc::mem_fun(*this, &studio::WorkArea::zoom_fit));
    zoomdial->signal_zoom_norm().connect(sigc::mem_fun(*this, &studio::WorkArea::zoom_norm));
    zoomdial->signal_zoom_edit().connect(sigc::mem_fun(*this, &studio::WorkArea::zoom_edit));

    hbox->pack_end(*hscrollbar1, Gtk::PACK_EXPAND_WIDGET, 0);
    hscrollbar1->show();
    hbox->pack_start(*zoomdial, Gtk::PACK_SHRINK, 0);
    zoomdial->show();

    attach(*hbox, 0, 2, 2, 3, Gtk::EXPAND | Gtk::FILL, Gtk::SHRINK | Gtk::FILL, 0, 0);
    hbox->show();

    add_events(Gdk::KEY_PRESS_MASK);
    drawing_area->add_events(Gdk::KEY_PRESS_MASK | Gdk::KEY_RELEASE_MASK);
    drawing_area->add_events(Gdk::BUTTON_PRESS_MASK | Gdk::BUTTON_RELEASE_MASK);
    drawing_area->add_events(Gdk::BUTTON1_MOTION_MASK | Gdk::BUTTON2_MOTION_MASK | Gdk::BUTTON3_MOTION_MASK | Gdk::POINTER_MOTION_MASK);
    drawing_area->add_events(Gdk::SCROLL_MASK);


    drawing_area->signal_draw().connect(sigc::mem_fun(*this, &WorkArea::refresh));
    drawing_area->signal_event().connect(sigc::mem_fun(*this, &WorkArea::on_drawing_area_event));
    drawing_area->signal_size_allocate().connect(sigc::hide(sigc::mem_fun(*this, &WorkArea::refresh_dimension_info)));

    canvas_interface->signal_rend_desc_changed().connect(sigc::mem_fun(*this, &WorkArea::refresh_dimension_info));
    // When either of the scrolling adjustments change, then redraw.
    get_scrollx_adjustment()->signal_value_changed().connect(sigc::mem_fun(*this, &WorkArea::queue_scroll));
    get_scrolly_adjustment()->signal_value_changed().connect(sigc::mem_fun(*this, &WorkArea::queue_scroll));
    get_scrollx_adjustment()->signal_value_changed().connect(sigc::mem_fun(*this, &WorkArea::refresh_dimension_info));
    get_scrolly_adjustment()->signal_value_changed().connect(sigc::mem_fun(*this, &WorkArea::refresh_dimension_info));

    get_canvas()->signal_meta_data_changed("grid_size").connect(sigc::mem_fun(*this, &WorkArea::load_meta_data));
    get_canvas()->signal_meta_data_changed("grid_color").connect(sigc::mem_fun(*this, &WorkArea::load_meta_data));
    get_canvas()->signal_meta_data_changed("grid_snap").connect(sigc::mem_fun(*this, &WorkArea::load_meta_data));
    get_canvas()->signal_meta_data_changed("grid_show").connect(sigc::mem_fun(*this, &WorkArea::load_meta_data));
    get_canvas()->signal_meta_data_changed("guide_show").connect(sigc::mem_fun(*this, &WorkArea::load_meta_data));
    get_canvas()->signal_meta_data_changed("guide_x").connect(sigc::mem_fun(*this, &WorkArea::load_meta_data));
    get_canvas()->signal_meta_data_changed("guide_y").connect(sigc::mem_fun(*this, &WorkArea::load_meta_data));
    get_canvas()->signal_meta_data_changed("onion_skin").connect(sigc::mem_fun(*this, &WorkArea::load_meta_data));
    get_canvas()->signal_meta_data_changed("onion_skin_past").connect(sigc::mem_fun(*this, &WorkArea::load_meta_data));
    get_canvas()->signal_meta_data_changed("onion_skin_future").connect(sigc::mem_fun(*this, &WorkArea::load_meta_data));
    get_canvas()->signal_meta_data_changed("guide_snap").connect(sigc::mem_fun(*this, &WorkArea::load_meta_data));
    get_canvas()->signal_meta_data_changed("guide_color").connect(sigc::mem_fun(*this, &WorkArea::load_meta_data));
    get_canvas()->signal_meta_data_changed("sketch").connect(sigc::mem_fun(*this, &WorkArea::load_meta_data));
    get_canvas()->signal_meta_data_changed("solid_lines").connect(sigc::mem_fun(*this, &WorkArea::load_meta_data));
    get_canvas()->signal_meta_data_changed("background_size").connect(sigc::mem_fun(*this, &WorkArea::load_meta_data));
    get_canvas()->signal_meta_data_changed("background_first_color").connect(sigc::mem_fun(*this, &WorkArea::load_meta_data));
    get_canvas()->signal_meta_data_changed("background_second_color").connect(sigc::mem_fun(*this, &WorkArea::load_meta_data));

    queued = false;
    meta_data_lock = false;
    set_focus_point(Point(0, 0));

    // If no meta data in canvas, assume it's new file and save default
    if (!have_meta_data()) {
        save_meta_data();
    }

    load_meta_data();
    // Load sketch
    {
        String data(canvas->get_meta_data("sketch"));

        if (!data.empty()) {
            if (!load_sketch(data)) {
                load_sketch(dirname(canvas->get_file_name()) + ETL_DIRECTORY_SEPARATOR + basename(data));
            }
        }
    }

    drawing_area->set_can_focus(true);
}

WorkArea::~WorkArea()
{

    // don't leave the render function queued if we are about to vanish;
    // that causes crashes
    if (render_idle_func_id) {
        render_idle_func_id = 0;
    }
}

#ifdef SINGLE_THREADED
bool
WorkArea::get_updating()const
{
    return App::single_threaded && async_renderer && async_renderer->updating;
}
#endif

#ifdef SINGLE_THREADED
void
WorkArea::stop_updating(bool cancel)
{
    async_renderer->stop();

    if (cancel) {
        canceled_ = true;
    }
}
#endif

void
WorkArea::save_meta_data()
{
    ChangeLocale change_locale(LC_NUMERIC, "C");

    if (meta_data_lock) {
        return;
    }

    meta_data_lock = true;

    Vector s(get_grid_size());
    canvas_interface->set_meta_data("grid_size", strprintf("%f %f", s[0], s[1]));
    Color c(get_grid_color());
    canvas_interface->set_meta_data("grid_color", strprintf("%f %f %f", c.get_r(), c.get_g(), c.get_b()));
    c = get_guides_color();
    canvas_interface->set_meta_data("guide_color", strprintf("%f %f %f", c.get_r(), c.get_g(), c.get_b()));
    canvas_interface->set_meta_data("grid_snap", get_grid_snap() ? "1" : "0");
    canvas_interface->set_meta_data("guide_snap", get_guide_snap() ? "1" : "0");
    canvas_interface->set_meta_data("guide_show", get_show_guides() ? "1" : "0");
    canvas_interface->set_meta_data("grid_show", show_grid ? "1" : "0");
    canvas_interface->set_meta_data("jack_offset", strprintf("%f", (double)jack_offset));
    canvas_interface->set_meta_data("onion_skin", onion_skin ? "1" : "0");
    canvas_interface->set_meta_data("onion_skin_past", strprintf("%d", onion_skins[0]));
    canvas_interface->set_meta_data("onion_skin_future", strprintf("%d", onion_skins[1]));

    s = get_background_size();
    canvas_interface->set_meta_data("background_size", strprintf("%f %f", s[0], s[1]));
    c = get_background_first_color();
    canvas_interface->set_meta_data("background_first_color", strprintf("%f %f %f", c.get_r(), c.get_g(), c.get_b()));
    c = get_background_second_color();
    canvas_interface->set_meta_data("background_second_color", strprintf("%f %f %f", c.get_r(), c.get_g(), c.get_b()));

    {
        String data;
        GuideList::const_iterator iter;

        for (iter = get_guide_list_x().begin(); iter != get_guide_list_x().end(); ++iter) {
            if (!data.empty()) {
                data += ' ';
            }

            data += strprintf("%f", *iter);
        }

        if (!data.empty()) {
            canvas_interface->set_meta_data("guide_x", data);
        } else if (!canvas->get_meta_data("guide_x").empty()) {
            canvas_interface->erase_meta_data("guide_x");
        }

        data.clear();

        for (iter = get_guide_list_y().begin(); iter != get_guide_list_y().end(); ++iter) {
            if (!data.empty()) {
                data += ' ';
            }

            data += strprintf("%f", *iter);
        }

        if (!data.empty()) {
            canvas_interface->set_meta_data("guide_y", data);
        } else if (!canvas->get_meta_data("guide_y").empty()) {
            canvas_interface->erase_meta_data("guide_y");
        }
    }

    if (get_sketch_filename().size()) {
        if (dirname(canvas->get_file_name()) == dirname(get_sketch_filename())) {
            canvas_interface->set_meta_data("sketch", basename(get_sketch_filename()));
        } else {
            canvas_interface->set_meta_data("sketch", get_sketch_filename());
        }
    }

    meta_data_lock = false;
}

bool
WorkArea::have_meta_data()
{
    String data_size, data_show;

    data_size = canvas->get_meta_data("grid_size");
    data_show = canvas->get_meta_data("grid_show");

    if (data_size.empty() && !data_show.size()) {
        return false;
    }

    return true;
}

void
WorkArea::load_meta_data()
{
    // we need to set locale careful, without calling functions and signals,
    // otherwise it can affect strings in GUI
    // ChangeLocale change_locale(LC_NUMERIC, "C");

    if (meta_data_lock) {
        return;
    }

    meta_data_lock = true;

    String data;

    data = canvas->get_meta_data("grid_size");

    if (!data.empty()) {
        float gx(get_grid_size()[0]), gy(get_grid_size()[1]);

        String::iterator iter(find(data.begin(), data.end(), ' '));
        String tmp(data.begin(), iter);

        {
            ChangeLocale change_locale(LC_NUMERIC, "C");

            if (!tmp.empty()) {
                gx = stratof(tmp);
            } else {
                synfig::error("WorkArea::load_meta_data(): Unable to parse data for \"grid_size\", which was \"%s\"", data.c_str());
            }

            if (iter == data.end()) {
                tmp.clear();
            } else {
                tmp = String(iter + 1, data.end());
            }

            if (!tmp.empty()) {
                gy = stratof(tmp);
            } else {
                synfig::error("WorkArea::load_meta_data(): Unable to parse data for \"grid_size\", which was \"%s\"", data.c_str());
            }
        }

        set_grid_size(Vector(gx, gy));
    }

    data = canvas->get_meta_data("grid_color");

    if (!data.empty()) {
        float gr(get_grid_color().get_r()), gg(get_grid_color().get_g()), gb(get_grid_color().get_b());

        String tmp;
        // Insert the string into a stream
        stringstream ss(data);
        // Create vector to hold our colors
        std::vector<String> tokens;

        int imaxcolor = 0;

        while (ss >> tmp && imaxcolor++ < 3) {
            tokens.push_back(tmp);
        }

        if (tokens.size() != 3 || imaxcolor > 3) {
            synfig::error("WorkArea::load_meta_data(): Unable to parse data for \"grid_color\", which was \"%s\". \"red green blue\" in [0,1] was expected", data.c_str());
            canvas_interface->get_ui_interface()->warning(_("Unable to set \"grid_color\""));
        } else {
            ChangeLocale change_locale(LC_NUMERIC, "C");
            gr = atof(tokens.at(0).data());
            gg = atof(tokens.at(1).data());
            gb = atof(tokens.at(2).data());
        }

        set_grid_color(synfig::Color(gr, gg, gb));
    }

    data = canvas->get_meta_data("guide_color");

    if (!data.empty()) {
        float gr(get_guides_color().get_r()), gg(get_guides_color().get_g()), gb(get_guides_color().get_b());

        String tmp;
        // Insert the string into a stream
        stringstream ss(data);
        // Create vector to hold our colors
        std::vector<String> tokens;

        int imaxcolor = 0;

        while (ss >> tmp && imaxcolor++ < 3) {
            tokens.push_back(tmp);
        }

        if (tokens.size() != 3 || imaxcolor > 3) {
            synfig::error("WorkArea::load_meta_data(): Unable to parse data for \"guide_color\", which was \"%s\". \"red green blue\" in [0,1] was expected", data.c_str());
            canvas_interface->get_ui_interface()->warning(_("Unable to set \"guide_color\""));
        } else {
            ChangeLocale change_locale(LC_NUMERIC, "C");
            gr = atof(tokens.at(0).data());
            gg = atof(tokens.at(1).data());
            gb = atof(tokens.at(2).data());
        }

        set_guides_color(synfig::Color(gr, gg, gb));
    }

    data = canvas->get_meta_data("grid_show");

    if (data.size() && (data == "1" || data[0] == 't' || data[0] == 'T')) {
        show_grid = true;
    }

    if (data.size() && (data == "0" || data[0] == 'f' || data[0] == 'F')) {
        show_grid = false;
    }

    data = canvas->get_meta_data("solid_lines");

    if (data.size() && (data == "1" || data[0] == 't' || data[0] == 'T')) {
        solid_lines = true;
    }

    if (data.size() && (data == "0" || data[0] == 'f' || data[0] == 'F')) {
        solid_lines = false;
    }

    data = canvas->get_meta_data("guide_show");

    if (data.size() && (data == "1" || data[0] == 't' || data[0] == 'T')) {
        show_guides = true;
    }

    if (data.size() && (data == "0" || data[0] == 'f' || data[0] == 'F')) {
        show_guides = false;
    }

    data = canvas->get_meta_data("grid_snap");

    if (data.size() && (data == "1" || data[0] == 't' || data[0] == 'T')) {
        set_grid_snap(true);
    }

    if (data.size() && (data == "0" || data[0] == 'f' || data[0] == 'F')) {
        set_grid_snap(false);
    }

    data = canvas->get_meta_data("guide_snap");

    if (data.size() && (data == "1" || data[0] == 't' || data[0] == 'T')) {
        set_guide_snap(true);
    }

    if (data.size() && (data == "0" || data[0] == 'f' || data[0] == 'F')) {
        set_guide_snap(false);
    }

    data = canvas->get_meta_data("onion_skin");

    if (data.size() && (data == "1" || data[0] == 't' || data[0] == 'T')) {
        set_onion_skin(true);
    }

    if (data.size() && (data == "0" || data[0] == 'f' || data[0] == 'F')) {
        set_onion_skin(false);
    }

    bool queue_render = false;
    data = canvas->get_meta_data("onion_skin_past");

    if (data.size()) {
        int past_kf = stratoi(data);

        if (past_kf > ONION_SKIN_PAST) {
            past_kf = ONION_SKIN_PAST;
        } else if (past_kf < 0) {
            past_kf =  0;
        }

        if (past_kf != onion_skins[0]) {
            onion_skins[0] = past_kf;
            queue_render = true;
        }
    }

    data = canvas->get_meta_data("onion_skin_future");

    if (data.size()) {
        int future_kf = stratoi(data);

        if (future_kf > ONION_SKIN_FUTURE) {
            future_kf = ONION_SKIN_FUTURE;
        } else if (future_kf < 0) {
            future_kf =  0;
        }

        if (future_kf != onion_skins[1]) {
            onion_skins[1] = future_kf;
            queue_render = true;
        }
    }

    // Update the canvas
    if (onion_skin && queue_render)	{
        queue_render_preview();
    }

    data = canvas->get_meta_data("guide_x");
    get_guide_list_x().clear();

    while (!data.empty()) {
        String::iterator iter(find(data.begin(), data.end(), ' '));
        String guide(data.begin(), iter);
        ChangeLocale change_locale(LC_NUMERIC, "C");

        if (!guide.empty()) {
            get_guide_list_x().push_back(stratof(guide));
        }

        if (iter == data.end()) {
            data.clear();
        } else {
            data = String(iter + 1, data.end());
        }
    }

    data = canvas->get_meta_data("guide_y");
    get_guide_list_y().clear();

    while (!data.empty()) {
        String::iterator iter(find(data.begin(), data.end(), ' '));
        String guide(data.begin(), iter);
        ChangeLocale change_locale(LC_NUMERIC, "C");

        if (!guide.empty()) {
            get_guide_list_y().push_back(stratof(guide));
        }

        if (iter == data.end()) {
            data.clear();
        } else {
            data = String(iter + 1, data.end());
        }
    }

    data = canvas->get_meta_data("jack_offset");

    if (!data.empty()) {
        jack_offset = stratof(data);
    }

    data = canvas->get_meta_data("background_size");

    if (!data.empty()) {
        float gx(get_background_size()[0]), gy(get_background_size()[1]);

        String::iterator iter(find(data.begin(), data.end(), ' '));
        String tmp(data.begin(), iter);

        {
            ChangeLocale change_locale(LC_NUMERIC, "C");

            if (!tmp.empty()) {
                gx = stratof(tmp);
            } else {
                synfig::error("WorkArea::load_meta_data(): Unable to parse data for \"background_size\", which was \"%s\"", data.c_str());
            }

            if (iter == data.end()) {
                tmp.clear();
            } else {
                tmp = String(iter + 1, data.end());
            }

            if (!tmp.empty()) {
                gy = stratof(tmp);
            } else {
                synfig::error("WorkArea::load_meta_data(): Unable to parse data for \"background_size\", which was \"%s\"", data.c_str());
            }
        }

        set_background_size(Vector(gx, gy));
    }

    data = canvas->get_meta_data("background_first_color");

    if (!data.empty()) {
        float gr(get_background_first_color().get_r()), gg(get_background_first_color().get_g()), gb(get_background_first_color().get_b());

        String tmp;
        // Insert the string into a stream
        stringstream ss(data);
        // Create vector to hold our colors
        std::vector<String> tokens;

        int imaxcolor = 0;

        while (ss >> tmp && imaxcolor++ < 3) {
            tokens.push_back(tmp);
        }

        if (tokens.size() != 3 || imaxcolor > 3) {
            synfig::error("WorkArea::load_meta_data(): Unable to parse data for \"background_first_color\", which was \"%s\". \"red green blue\" in [0,1] was expected", data.c_str());
            canvas_interface->get_ui_interface()->warning(_("Unable to set \"background_first_color\""));
        } else {
            ChangeLocale change_locale(LC_NUMERIC, "C");
            gr = atof(tokens.at(0).data());
            gg = atof(tokens.at(1).data());
            gb = atof(tokens.at(2).data());
        }

        set_background_first_color(synfig::Color(gr, gg, gb));
    }

    data = canvas->get_meta_data("background_second_color");

    if (!data.empty()) {
        float gr(get_background_second_color().get_r()), gg(get_background_second_color().get_g()), gb(get_background_second_color().get_b());

        String tmp;
        // Insert the string into a stream
        stringstream ss(data);
        // Create vector to hold our colors
        std::vector<String> tokens;

        int imaxcolor = 0;

        while (ss >> tmp && imaxcolor++ < 3) {
            tokens.push_back(tmp);
        }

        if (tokens.size() != 3 || imaxcolor > 3) {
            synfig::error("WorkArea::load_meta_data(): Unable to parse data for \"background_second_color\", which was \"%s\". \"red green blue\" in [0,1] was expected", data.c_str());
            canvas_interface->get_ui_interface()->warning(_("Unable to set \"background_second_color\""));
        } else {
            ChangeLocale change_locale(LC_NUMERIC, "C");
            gr = atof(tokens.at(0).data());
            gg = atof(tokens.at(1).data());
            gb = atof(tokens.at(2).data());
        }

        set_background_second_color(synfig::Color(gr, gg, gb));
    }

    meta_data_lock = false;
    queue_draw();
    signal_meta_data_changed()();
}

void
WorkArea::set_onion_skin(bool x)
{
    if (onion_skin == x) {
        return;
    }

    onion_skin = x;
    save_meta_data();
    queue_render_preview();
}

bool
WorkArea::get_onion_skin()const
{
    return onion_skin;
}

void WorkArea::set_onion_skins(int *onions)
{
    onion_skins[0] = onions[0];
    onion_skins[1] = onions[1];

    if (onion_skin) {
        queue_render_preview();
    }

    save_meta_data();
}

int const *
WorkArea::get_onion_skins()const
{
    return onion_skins;
}

void
WorkArea::enable_grid()
{
    show_grid = true;
    save_meta_data();
    queue_draw();
}

void
WorkArea::disable_grid()
{
    show_grid = false;
    save_meta_data();
    queue_draw();
}

void
WorkArea::toggle_grid()
{
    show_grid = !show_grid;
    save_meta_data();
    queue_draw();
}

void
WorkArea::toggle_grid_snap()
{
    Duckmatic::toggle_grid_snap();
    save_meta_data();
    queue_draw();
}

void
WorkArea::set_show_guides(bool x)
{
    show_guides = x;
    save_meta_data();
    queue_draw();
}

void
WorkArea::toggle_guide_snap()
{
    Duckmatic::toggle_guide_snap();
    save_meta_data();
    queue_draw();
}

void
WorkArea::set_guides_color(const synfig::Color &c)
{
    Duckmatic::set_guides_color(c);
    save_meta_data();
    queue_draw();
}

void
WorkArea::set_jack_offset(const synfig::Time &x)
{
    if (jack_offset == x) {
        return;
    }

    jack_offset = x;
    save_meta_data();
}

void
WorkArea::set_low_resolution_flag(bool x)
{
    if (x != low_resolution) {
        low_resolution = x;
        queue_render_preview();
    }
}

void
WorkArea::toggle_low_resolution_flag()
{
    set_low_resolution_flag(!get_low_resolution_flag());
}

void
WorkArea::popup_menu()
{
    signal_popup_menu()();
}

void
WorkArea::set_grid_size(const synfig::Vector &s)
{
    Duckmatic::set_grid_size(s);
    save_meta_data();
    queue_draw();
}

void
WorkArea::set_grid_color(const synfig::Color &c)
{
    Duckmatic::set_grid_color(c);
    save_meta_data();
    queue_draw();
}

void
WorkArea::set_background_size(const synfig::Vector &s)
{
    if (background_size != s) {
        background_size = s;
        save_meta_data();
    }

    queue_draw();
}

void
WorkArea::set_background_first_color(const synfig::Color &c)
{
    if (background_first_color != c) {
        background_first_color = c;
        save_meta_data();
    }

    queue_draw();
}

void
WorkArea::set_background_second_color(const synfig::Color &c)
{
    if (background_second_color != c) {
        background_second_color = c;
        save_meta_data();
    }

    queue_draw();
}

void
WorkArea::set_focus_point(const synfig::Point &point)
{
    // These next three lines try to ensure that we place the
    // focus on a pixel boundary

    const synfig::Point& adjusted(point);

    synfig::RendDesc &rend_desc(get_canvas()->rend_desc());
    Real x_factor = (rend_desc.get_br()[0] - rend_desc.get_tl()[0] > 0) ? -1 : 1;
    Real y_factor = (rend_desc.get_br()[1] - rend_desc.get_tl()[1] > 0) ? -1 : 1;

    get_scrollx_adjustment()->set_value(adjusted[0]*x_factor);
    get_scrolly_adjustment()->set_value(adjusted[1]*y_factor);
}

synfig::Point
WorkArea::get_focus_point()const
{
    synfig::RendDesc &rend_desc(get_canvas()->rend_desc());
    Real x_factor = (rend_desc.get_br()[0] - rend_desc.get_tl()[0] > 0) ? -1 : 1;
    Real y_factor = (rend_desc.get_br()[1] - rend_desc.get_tl()[1] > 0) ? -1 : 1;

    return synfig::Point(get_scrollx_adjustment()->get_value() * x_factor, get_scrolly_adjustment()->get_value() * y_factor);
}

bool
WorkArea::set_wh(int W, int H, int CHAN)
{
    // If our size is already set, don't set it again
    if (W == w && H == h && CHAN == bpp) {
        return true;
    }

    if (W <= 0 || H <= 0 || CHAN <= 0) {
        return false;
    }

    assert(W > 0);
    assert(H > 0);
    assert(CHAN > 0);

    // Set all of the parameters
    w = W;
    h = H;
    bpp = CHAN;

    refresh_dimension_info();

    tile_book.clear();

    return true;
}

bool
WorkArea::on_key_press_event(GdkEventKey* event)
{
    if (Smach::RESULT_OK == canvas_view->get_smach().process_event(
                EventKeyboard(EVENT_WORKAREA_KEY_DOWN, event->keyval, Gdk::ModifierType(event->state)))) {
        return true;
    }

    if (get_selected_ducks().empty()) {
        return false;
    }

    Real multiplier(1.0);

    if (Gdk::ModifierType(event->state)&GDK_SHIFT_MASK) {
        multiplier = 10.0;
    }

    Vector nudge;

    switch (event->keyval) {
    case GDK_KEY_Left:
        nudge = Vector(-pw, 0);
        break;

    case GDK_KEY_Right:
        nudge = Vector(pw, 0);
        break;

    case GDK_KEY_Up:
        nudge = Vector(0, -ph);
        break;

    case GDK_KEY_Down:
        nudge = Vector(0, ph);
        break;

    default:
        return false;
        break;
    }

    synfigapp::Action::PassiveGrouper grouper(instance.get(), _("Nudge"));

    // Grid snap does not apply to nudging
    bool grid_snap_holder(get_grid_snap());
    bool guide_snap_holder(get_guide_snap());
    set_grid_snap(false);

    try {
        start_duck_drag(get_selected_duck()->get_trans_point());
        translate_selected_ducks(get_selected_duck()->get_trans_point() + nudge * multiplier);
        end_duck_drag();
    } catch (String) {
        canvas_view->duck_refresh_flag = true;
        canvas_view->queue_rebuild_ducks();
    }

    set_grid_snap(grid_snap_holder);
    set_guide_snap(guide_snap_holder);

    return true;
}

bool
WorkArea::on_key_release_event(GdkEventKey* event)
{
    return Smach::RESULT_OK == canvas_view->get_smach().process_event(
               EventKeyboard(EVENT_WORKAREA_KEY_UP, event->keyval, Gdk::ModifierType(event->state)));
}

bool
WorkArea::on_drawing_area_event(GdkEvent *event)
{
    synfig::Point mouse_pos;
    float bezier_click_pos;
    const float radius((abs(pw) + abs(ph)) * 4);
    int button_pressed(0);
    float pressure(0);
    Gdk::ModifierType modifier(Gdk::ModifierType(0));

    // Handle input stuff
    if (event->any.type == GDK_MOTION_NOTIFY) {
        GdkDevice *device = event->motion.device;
        modifier = Gdk::ModifierType(event->motion.state);

        // Make sure we recognize the device
        if (curr_input_device) {
            if (curr_input_device != device) {
                assert(device);
                curr_input_device = device;
                signal_input_device_changed()(curr_input_device);
            }
        } else if (device) {
            curr_input_device = device;
            signal_input_device_changed()(curr_input_device);
        }

        assert(curr_input_device);

        // Calculate the position of the
        // input device in canvas coordinates

        double x = 0.0, y = 0.0, p = 0.0;
        int ox = 0, oy = 0;
#ifndef _WIN32
        Gtk::Container *toplevel = drawing_frame->get_toplevel();

        if (toplevel) {
            drawing_frame->translate_coordinates(*toplevel, 0, 0, ox, oy);
        }

#endif

        if (gdk_device_get_axis(device, event->motion.axes, GDK_AXIS_X, &x)) {
            x -= ox;
        } else {
            x = event->motion.x;
        }

        if (gdk_device_get_axis(device, event->motion.axes, GDK_AXIS_Y, &y)) {
            y -= oy;
        } else {
            y = event->motion.y;
        }

        if (gdk_device_get_axis(device, event->motion.axes, GDK_AXIS_PRESSURE, &p)) {
            p = std::max(0.0, (p - 0.04) / (1.0 - 0.04));
        } else {
            p = 1.0;
        }

        if (std::isnan(x) || std::isnan(y) || std::isnan(p)) {
            return false;
        }

        mouse_pos = synfig::Point(screen_to_comp_coords(synfig::Point(x, y)));
        pressure = (float)p;
    } else if (event->any.type == GDK_BUTTON_PRESS  ||
               event->any.type == GDK_2BUTTON_PRESS ||
               event->any.type == GDK_3BUTTON_PRESS ||
               event->any.type == GDK_BUTTON_RELEASE) {
        GdkDevice *device = event->button.device;
        modifier = Gdk::ModifierType(event->button.state);
        drawing_area->grab_focus();

        // Make sure we recognize the device
        if (curr_input_device) {
            if (curr_input_device != device) {
                assert(device);
                curr_input_device = device;
                signal_input_device_changed()(curr_input_device);
            }
        } else if (device) {
            curr_input_device = device;
            signal_input_device_changed()(curr_input_device);
        }

        assert(curr_input_device);

        // Calculate the position of the
        // input device in canvas coordinates
        // and the buttons

        double x = 0.0, y = 0.0, p = 0.0;
        int ox = 0, oy = 0;
#ifndef _WIN32
        Gtk::Container *toplevel = drawing_frame->get_toplevel();

        if (toplevel) {
            drawing_frame->translate_coordinates(*toplevel, 0, 0, ox, oy);
        }

#endif

        if (gdk_device_get_axis(device, event->motion.axes, GDK_AXIS_X, &x)) {
            x -= ox;
        } else {
            x = event->motion.x;
        }

        if (gdk_device_get_axis(device, event->motion.axes, GDK_AXIS_Y, &y)) {
            y -= oy;
        } else {
            y = event->motion.y;
        }

        if (gdk_device_get_axis(device, event->motion.axes, GDK_AXIS_PRESSURE, &p)) {
            p = std::max(0.0, (p - 0.04) / (1.0 - 0.04));
        } else {
            p = 1.0;
        }

        if (std::isnan(x) || std::isnan(y) || std::isnan(p)) {
            return false;
        }

        mouse_pos = synfig::Point(screen_to_comp_coords(synfig::Point(x, y)));
        pressure = (float)p;
        button_pressed = event->button.button;

        if (button_pressed == 1 && pressure <= 0.f && (event->any.type != GDK_BUTTON_RELEASE && event->any.type != GDK_BUTTON_PRESS)) {
            button_pressed = 0;
        }
    } else

        // GDK mouse scrolling events
        if (event->any.type == GDK_SCROLL) {
            // GDK information needed to properly interpret mouse
            // scrolling events are: scroll.state, scroll.x/scroll.y, and
            // scroll.direction. The value of scroll.direction will be
            // obtained later.

            modifier = Gdk::ModifierType(event->scroll.state);
            mouse_pos = synfig::Point(screen_to_comp_coords(synfig::Point(event->scroll.x, event->scroll.y)));
        }

    // Handle the renderables
    {
        std::set<etl::handle<WorkAreaRenderer> >::iterator iter;

        for (iter = renderer_set_.begin(); iter != renderer_set_.end(); ++iter) {
            if ((*iter)->get_enabled())
                if ((*iter)->event_vfunc(event)) {
                    // Event handled. Return true.
                    return true;
                }
        }
    }

    // Event hasn't been handled, pass it down
    switch (event->type) {
    case GDK_BUTTON_PRESS: {
        switch (button_pressed) {
        case 1: {	// Attempt to click on a duck
            etl::handle<Duck> duck;
            dragging = DRAG_NONE;

            if (allow_duck_clicks) {
                duck = find_duck(mouse_pos, radius);

                // TODO Remove HARDCODE Ui Specification, make it config ready

                // Single click duck selection on WorkArea [Part I] (Part II lower in code)
                if (duck) {
                    // make a note of whether the duck we click on was selected or not
                    if (duck_is_selected(duck)) {
                        clicked_duck = duck;
                    } else {
                        clicked_duck = 0;

                        // if CTRL or SHIFT isn't pressed, clicking an unselected duck will unselect all other ducks
                        if (!(modifier & (GDK_CONTROL_MASK | GDK_SHIFT_MASK))) {
                            clear_selected_ducks();
                        }

                        select_duck(duck);
                    }
                }
            }

            // else

            if (allow_bezier_clicks) {
                selected_bezier = find_bezier(mouse_pos, radius, &bezier_click_pos);
            } else {
                selected_bezier = 0;
            }

            if (duck) {
                if (!duck->get_editable(get_alternative_mode())) {
                    return true;
                }


                // if the user is holding shift while clicking on a tangent duck, consider splitting the tangent
                if ((event->button.state & GDK_SHIFT_MASK) && duck->get_type() == Duck::TYPE_TANGENT) {
                    synfigapp::ValueDesc value_desc = duck->get_value_desc();

                    // we have the tangent, but need the vertex - that's the parent
                    if (value_desc.is_value_node()) {
                        if (ValueNode_Composite::Handle value_node = ValueNode_Composite::Handle::cast_dynamic(value_desc.get_value_node())) {
                            BLinePoint bp((*value_node)(get_time()).get(BLinePoint()));

                            // if the tangent isn't split, then split it
                            if (!bp.get_split_tangent_both()) {
                                if (get_canvas_view()->canvas_interface()->change_value(synfigapp::ValueDesc(
                                            value_node,
                                            value_node->get_link_index_from_name("split_radius")),
                                        true)
                                        && get_canvas_view()->canvas_interface()->change_value(synfigapp::ValueDesc(
                                                    value_node,
                                                    value_node->get_link_index_from_name("split_angle")),
                                                true)
                                   ) {
                                    // rebuild the ducks from scratch, so the tangents ducks aren't connected
                                    get_canvas_view()->rebuild_ducks();

                                    // reprocess the mouse click
                                    return on_drawing_area_event(event);
                                } else {
                                    return true;
                                }
                            }
                        } else {
                            synfig::info("parent isn't composite value node?");
                        }
                    } else {
                        // I don't know how to access the vertex from the tangent duck when originally drawing the bline in the bline tool
                        synfig::info("parent isn't value node?  shift-drag-tangent doesn't work in bline tool yet...");
                    }
                }

                dragging = DRAG_DUCK;
                drag_point = mouse_pos;
                start_duck_drag(mouse_pos);
                get_canvas_view()->reset_cancel_status();
                return true;
            } else if (canvas_view->get_smach().process_event(EventMouse(EVENT_WORKAREA_MOUSE_BUTTON_DOWN, BUTTON_LEFT, mouse_pos, pressure, modifier)) == Smach::RESULT_OK) {
                if (selected_bezier) {
                    synfig::Point distance_1 = selected_bezier->p1->get_trans_point() - mouse_pos;
                    synfig::Point distance_2 = selected_bezier->p2->get_trans_point() - mouse_pos;

                    if (distance_1.mag() > radius * 2
                            && distance_2.mag() > radius * 2
                       )
                        // If we click a selected bezier
                        // not too close to the endpoints
                    {
                        // We give the states first priority to process the
                        // event so as not to interfere with the bline tool
                        dragging = DRAG_BEZIER;
                        drag_point = mouse_pos;
                        start_bezier_drag(mouse_pos, bezier_click_pos);
                        return true;
                    }
                }

// I commented out this section because
// it was causing issues when rotoscoping.
// At the moment, we don't need it, so
// this was the easiest way to fix the problem.

                // Check for a guide click
                if (show_guides) {
                    GuideList::iterator iter;

                    iter = find_guide_x(mouse_pos, radius);

                    if (iter == get_guide_list_x().end()) {
                        curr_guide_is_x = false;
                        iter = find_guide_y(mouse_pos, radius);
                    } else {
                        curr_guide_is_x = true;
                    }

                    if (iter != get_guide_list_x().end() && iter != get_guide_list_y().end()) {
                        dragging = DRAG_GUIDE;
                        curr_guide = iter;
                        return true;
                    }
                }

                // All else fails, try making a selection box
                dragging = DRAG_BOX;
                curr_point = drag_point = mouse_pos;
                return true;
            }

            selected_bezier = 0;
            break;
        }

        case 2: {	// Attempt to drag and move the window
            etl::handle<Duck> duck = find_duck(mouse_pos, radius);
            etl::handle<Bezier> bezier = find_bezier(mouse_pos, radius, &bezier_click_pos);

            if (duck) {
                duck->signal_user_click(1)();
            } else if (bezier) {
                bezier->signal_user_click(1)(bezier_click_pos);
            }

            if (canvas_view->get_smach().process_event(EventMouse(EVENT_WORKAREA_MOUSE_BUTTON_DOWN, BUTTON_MIDDLE, mouse_pos, pressure, modifier)) == Smach::RESULT_OK) {
                dragging = (modifier & GDK_CONTROL_MASK) ? DRAG_ZOOM_WINDOW
                           : (modifier & GDK_SHIFT_MASK)   ? DRAG_ROTATE_WINDOW
                           : DRAG_WINDOW;

                drag_point = (modifier & GDK_CONTROL_MASK) ? synfig::Point(event->motion.x, event->motion.y) :
                             mouse_pos;

                signal_user_click(1)(mouse_pos);
            }

            break;
        }

        case 3: {	// Attempt to either get info on a duck, or open the menu
            etl::handle<Duck> duck = find_duck(mouse_pos, radius);
            etl::handle<Bezier> bezier = find_bezier(mouse_pos, radius, &bezier_click_pos);

            Layer::Handle layer(get_canvas()->find_layer(get_canvas_view()->get_context_params(), mouse_pos));

            if (duck) {
                if (get_selected_ducks().size() <= 1) {
                    duck->signal_user_click(2)();
                } else {
                    canvas_view->get_smach().process_event(EventMouse(EVENT_WORKAREA_MULTIPLE_DUCKS_CLICKED, BUTTON_RIGHT, mouse_pos, pressure, modifier, duck));
                }

                return true;
            } else if (bezier) {
                bezier->signal_user_click(2)(bezier_click_pos);
                return true;
            } else if (layer) {
                if (canvas_view->get_smach().process_event(EventLayerClick(layer, BUTTON_RIGHT, mouse_pos)) == Smach::RESULT_OK) {
                    return false;
                }

                return true;
            } else {
                canvas_view->get_smach().process_event(EventMouse(EVENT_WORKAREA_MOUSE_BUTTON_DOWN, BUTTON_RIGHT, mouse_pos, pressure, modifier));
            }

            break;
        }

        case 4:
            signal_user_click(3)(mouse_pos);
            break;

        case 5:
            signal_user_click(4)(mouse_pos);
            break;

        default:
            break;
        }
    }
    break;

    case GDK_MOTION_NOTIFY:
        curr_point = mouse_pos;

        if (event->motion.time - last_event_time < 25) {
            return true;
        } else {
            last_event_time = event->motion.time;
        }

        signal_cursor_moved_();

        // Guide/Duck highlights on hover
        switch (dragging) {
        case DRAG_NONE: {
            GuideList::iterator iter;

            iter = find_guide_x(mouse_pos, radius);

            if (iter == get_guide_list_x().end()) {
                iter = find_guide_y(mouse_pos, radius);
            }

            if (iter != curr_guide) {
                curr_guide = iter;
                drawing_area->queue_draw();
            }

            etl::handle<Duck> duck;
            duck = find_duck(mouse_pos, radius);

            if (duck != hover_duck) {
                hover_duck = duck;
                drawing_area->queue_draw();
            }
        }
        break;

        case DRAG_DUCK : {
            if (canvas_view->get_cancel_status()) {
                dragging = DRAG_NONE;
                canvas_view->queue_rebuild_ducks();
                return true;
            }



            set_axis_lock(event->motion.state & GDK_SHIFT_MASK);

            translate_selected_ducks(mouse_pos);

            drawing_area->queue_draw();
        }
        break;

        case DRAG_BEZIER : {
            if (canvas_view->get_cancel_status()) {
                dragging = DRAG_NONE;
                canvas_view->queue_rebuild_ducks();
                return true;
            }

            translate_selected_bezier(mouse_pos);

            drawing_area->queue_draw();
        }
        break;

        case DRAG_BOX: {
            curr_point = mouse_pos;
            drawing_area->queue_draw();
        }
        break;

        case DRAG_GUIDE : {
            if (curr_guide_is_x) {
                *curr_guide = mouse_pos[0];
            } else {
                *curr_guide = mouse_pos[1];
            }

            drawing_area->queue_draw();
        }
        break;

        default: {

        }
        }// end switch dragging

        if (dragging != DRAG_WINDOW) {
            // Update those triangle things on the rulers
            const synfig::Point point(mouse_pos);
            hruler->set_position(Distance(point[0], Distance::SYSTEM_UNITS).get(App::distance_system, get_canvas()->rend_desc()));
            vruler->set_position(Distance(point[1], Distance::SYSTEM_UNITS).get(App::distance_system, get_canvas()->rend_desc()));
        }

        if (dragging == DRAG_WINDOW) {
            set_focus_point(get_focus_point() + mouse_pos - drag_point);
        } else if (dragging == DRAG_ZOOM_WINDOW) {
            set_zoom(get_zoom() * (1.0 + (drag_point[1] - event->motion.y) / 100.0));
            drag_point = synfig::Point(event->motion.x, event->motion.y);
        } else if ((event->motion.state & GDK_BUTTON1_MASK) &&
                   canvas_view->get_smach().process_event(EventMouse(EVENT_WORKAREA_MOUSE_BUTTON_DRAG, BUTTON_LEFT,
                           mouse_pos, pressure, modifier)) == Smach::RESULT_ACCEPT) {
            return true;
        } else if ((event->motion.state & GDK_BUTTON2_MASK) &&
                   canvas_view->get_smach().process_event(EventMouse(EVENT_WORKAREA_MOUSE_BUTTON_DRAG, BUTTON_MIDDLE,
                           mouse_pos, pressure, modifier)) == Smach::RESULT_ACCEPT) {
            return true;
        } else if ((event->motion.state & GDK_BUTTON3_MASK) &&
                   canvas_view->get_smach().process_event(EventMouse(EVENT_WORKAREA_MOUSE_BUTTON_DRAG, BUTTON_RIGHT,
                           mouse_pos, pressure, modifier)) == Smach::RESULT_ACCEPT) {
            return true;
        } else if (canvas_view->get_smach().process_event(EventMouse(EVENT_WORKAREA_MOUSE_MOTION, BUTTON_NONE,
                   mouse_pos, pressure, modifier)) == Smach::RESULT_ACCEPT) {
            return true;
        }

        break;

    case GDK_BUTTON_RELEASE: {
        bool ret(false);

        switch (dragging) {
        case DRAG_GUIDE : {
            double y(event->button.y), x(event->button.x);

            // Erase the guides if dragged into the rulers
            if (curr_guide_is_x && !std::isnan(x) && x < 0.0) {
                get_guide_list_x().erase(curr_guide);
            } else if (!curr_guide_is_x && !std::isnan(y) && y < 0.0) {
                get_guide_list_y().erase(curr_guide);
            }

            drawing_area->queue_draw();

            dragging = DRAG_NONE;
            save_meta_data();
            return true;
        }
        break;

        case DRAG_DUCK : {
            synfigapp::Action::PassiveGrouper grouper(instance.get(), _("Move"));
            dragging = DRAG_NONE;
            // translate_selected_ducks(mouse_pos);
            set_axis_lock(false);

            try {
                get_canvas_view()->duck_refresh_flag = false;
                get_canvas_view()->duck_refresh_needed = false;
                const bool drag_did_anything(end_duck_drag());
                get_canvas_view()->duck_refresh_flag = true;

                if (!drag_did_anything) {
                    // TODO Remove HARDCODED UI SPECIFICATION, make it config ready

                    // Single click duck selection on WorkArea [Part II]
                    // if we originally clicked on a selected duck ...
                    if (clicked_duck) {
                        // ... and CTRL is pressed, then just toggle the clicked duck
                        //     or not SHIFT is pressed, make the clicked duck the
                        //     only selected duck. (Nota : SHIFT just add to the selection)
                        if (modifier & GDK_CONTROL_MASK) {
                            unselect_duck(clicked_duck);
                        } else if (!(modifier & GDK_SHIFT_MASK)) {
                            clear_selected_ducks();
                            select_duck(clicked_duck);
                        }

                        clicked_duck->signal_user_click(0)();
                    }
                } else {
                    if (canvas_view->duck_refresh_needed) {
                        canvas_view->queue_rebuild_ducks();
                    }

                    return true;
                }
            } catch (String) {
                canvas_view->duck_refresh_flag = true;
                canvas_view->queue_rebuild_ducks();
                return true;
            }

            clicked_duck = 0;

            ret = true;
        }
        break;

        case DRAG_BEZIER : {
            synfigapp::Action::PassiveGrouper grouper(instance.get(), _("Move"));
            dragging = DRAG_NONE;
            // translate_selected_ducks(mouse_pos);
            set_axis_lock(false);

            try {
                get_canvas_view()->duck_refresh_flag = false;
                get_canvas_view()->duck_refresh_needed = false;
                const bool drag_did_anything(end_bezier_drag());
                get_canvas_view()->duck_refresh_flag = true;

                if (!drag_did_anything) {
                    // We didn't move the bezier, just clicked on it
                    canvas_view->get_smach().process_event(EventMouse(EVENT_WORKAREA_MOUSE_BUTTON_DOWN, BUTTON_LEFT, mouse_pos, pressure, modifier));
                    canvas_view->get_smach().process_event(EventMouse(EVENT_WORKAREA_MOUSE_BUTTON_UP, BUTTON_LEFT, mouse_pos, pressure, modifier));
                } else {
                    if (canvas_view->duck_refresh_needed) {
                        canvas_view->queue_rebuild_ducks();
                    }

                    return true;
                }
            } catch (String) {
                canvas_view->duck_refresh_flag = true;
                canvas_view->queue_rebuild_ducks();
                return true;
            }

            clicked_duck = 0;

            ret = true;
        }
        break;

        case DRAG_BOX: {
            dragging = DRAG_NONE;

            if ((drag_point - mouse_pos).mag() > radius / 2.0f) {
                if (canvas_view->get_smach().process_event(EventBox(drag_point, mouse_pos, MouseButton(event->button.button), modifier)) == Smach::RESULT_ACCEPT) {
                    return true;
                }

                /*
                 * Commented out because now the work is
                 * done in Renderer_Dragbox::event_vfunc
                 *

                // when dragging a box around some ducks:
                // SHIFT selects; CTRL toggles; SHIFT+CTRL unselects; <none> clears all then selects

                if(modifier&GDK_SHIFT_MASK)
                	select_ducks_in_box(drag_point,mouse_pos);

                if(modifier&GDK_CONTROL_MASK)
                	toggle_select_ducks_in_box(drag_point,mouse_pos);
                else if(!(modifier&GDK_SHIFT_MASK))
                {
                	clear_selected_ducks();
                	select_ducks_in_box(drag_point,mouse_pos);
                }
                *
                */
                ret = true;
            } else {
                if (allow_layer_clicks) {
                    Layer::Handle layer(get_canvas()->find_layer(get_canvas_view()->get_context_params(), drag_point));
                    {
                        if (canvas_view->get_smach().process_event(EventLayerClick(layer, BUTTON_LEFT, mouse_pos, modifier)) == Smach::RESULT_OK) {
                            signal_layer_selected_(layer);
                        }

                        ret = true;
                    }
                } else {
                    signal_user_click(0)(mouse_pos);
                }
            }

            drawing_area->queue_draw();
        }
        break;

        default: {
        }
        } // end switch dragging

        dragging = DRAG_NONE;

        if (canvas_view->get_smach().process_event(EventMouse(EVENT_WORKAREA_MOUSE_BUTTON_UP, MouseButton(event->button.button), mouse_pos, pressure, modifier)) == Smach::RESULT_ACCEPT) {
            ret = true;
        }

        return ret;
    }
    break;

    case GDK_SCROLL: {
        // Handle a mouse scrolling event like Xara Xtreme and
        // Inkscape:

        // TODO Remove HARDCODED UI SPECIFICATION, make it config ready

        // Scroll up/down: scroll up/down
        // Shift + scroll up/down: scroll left/right
        // Control + scroll up/down: zoom in/out

        if (modifier & GDK_CONTROL_MASK) {

            // The zoom is performed while preserving the pointer
            // position as a fixed point (similarly to Xara Xtreme and

            // The strategy used below is to scroll to the updated
            // position, then zoom. This is easy to implement within
            // the present architecture, but has the disadvantage of
            // triggering multiple visible refreshes. Note: 1.25 is
            // the hard wired ratio in zoom_in()/zoom_out(). The
            // variable "drift" compensates additional inaccuracies in
            // the zoom. There is also an additional minus sign for
            // the inverted y coordinates.

            // FIXME: One might want to figure out where in the code
            // this empirical drift is been introduced.

            const synfig::Point scroll_point(get_scrollx_adjustment()->get_value(), get_scrolly_adjustment()->get_value());
            const double drift = 0.052;

            switch (event->scroll.direction) {
            case GDK_SCROLL_UP:
            case GDK_SCROLL_RIGHT:
                get_scrollx_adjustment()->set_value(scroll_point[0] + (mouse_pos[0] - scroll_point[0]) * (1.25 - (1 + drift)));
                get_scrolly_adjustment()->set_value(scroll_point[1] - (mouse_pos[1] + scroll_point[1]) * (1.25 - (1 + drift)));
                zoom_in();
                break;

            case GDK_SCROLL_DOWN:
            case GDK_SCROLL_LEFT:
                get_scrollx_adjustment()->set_value(scroll_point[0] + (mouse_pos[0] - scroll_point[0]) * (1 / 1.25 - (1 + drift)));
                get_scrolly_adjustment()->set_value(scroll_point[1] - (mouse_pos[1] + scroll_point[1]) * (1 / 1.25 - (1 + drift)));
                zoom_out();
                break;

            default:
                break;
            }
        } else if (modifier & GDK_SHIFT_MASK) {
            // Scroll in either direction by 20 pixels. Ideally, the
            // amount of pixels per scrolling event should be
            // configurable. Xara Xtreme currently uses an (hard
            // wired) amount 20 pixel, Inkscape defaults to 40 pixels.

            const int scroll_pixel = 20;

            switch (event->scroll.direction) {
            case GDK_SCROLL_UP:
                get_scrollx_adjustment()->set_value(get_scrollx_adjustment()->get_value() - scroll_pixel * pw);
                break;

            case GDK_SCROLL_DOWN:
                get_scrollx_adjustment()->set_value(get_scrollx_adjustment()->get_value() + scroll_pixel * pw);
                break;

            case GDK_SCROLL_LEFT:
                get_scrolly_adjustment()->set_value(get_scrolly_adjustment()->get_value() + scroll_pixel * ph);
                break;

            case GDK_SCROLL_RIGHT:
                get_scrolly_adjustment()->set_value(get_scrolly_adjustment()->get_value() - scroll_pixel * ph);
                break;

            default:
                break;
            }
        } else {
            // Scroll in either direction by 20 pixels. Ideally, the
            // amount of pixels per scrolling event should be
            // configurable. Xara Xtreme currently uses an (hard
            // wired) amount 20 pixel, Inkscape defaults to 40 pixels.

            const int scroll_pixel = 20;

            switch (event->scroll.direction) {
            case GDK_SCROLL_UP:
                get_scrolly_adjustment()->set_value(get_scrolly_adjustment()->get_value() + scroll_pixel * ph);
                break;

            case GDK_SCROLL_DOWN:
                get_scrolly_adjustment()->set_value(get_scrolly_adjustment()->get_value() - scroll_pixel * ph);
                break;

            case GDK_SCROLL_LEFT:
                get_scrollx_adjustment()->set_value(get_scrollx_adjustment()->get_value() - scroll_pixel * pw);
                break;

            case GDK_SCROLL_RIGHT:
                get_scrollx_adjustment()->set_value(get_scrollx_adjustment()->get_value() + scroll_pixel * pw);
                break;

            default:
                break;
            }
        }
    }
    break;

    default:
        break;
    }

    return false;
}

bool
WorkArea::on_hruler_event(GdkEvent *event)
{
    switch (event->type) {
    case GDK_BUTTON_PRESS:
        if (dragging == DRAG_NONE && show_guides) {
            dragging = DRAG_GUIDE;
            curr_guide = get_guide_list_y().insert(get_guide_list_y().begin(), 0.0);
            curr_guide_is_x = false;
        }

        return true;
        break;

    case GDK_MOTION_NOTIFY:

        // Guide movement
        if (dragging == DRAG_GUIDE && curr_guide_is_x == false) {
            // Event is in the hruler, which has a slightly different
            // coordinate system from the canvas.
            event->motion.y -= hruler->get_height() + 2;

            // call the on drawing area event to refresh eveything.
            on_drawing_area_event(event);
        }

        return true;
        break;

    case GDK_BUTTON_RELEASE:
        if (dragging == DRAG_GUIDE && curr_guide_is_x == false) {
            dragging = DRAG_NONE;
            save_meta_data();
        }

        break;
        return true;

    default:
        break;
    }

    return false;
}

bool
WorkArea::on_vruler_event(GdkEvent *event)
{
    switch (event->type) {
    case GDK_BUTTON_PRESS:
        if (dragging == DRAG_NONE && show_guides) {
            dragging = DRAG_GUIDE;
            curr_guide = get_guide_list_x().insert(get_guide_list_x().begin(), 0.0);
            curr_guide_is_x = true;
        }

        return true;
        break;

    case GDK_MOTION_NOTIFY:

        // Guide movement
        if (dragging == DRAG_GUIDE && curr_guide_is_x == true) {
            // Event is in the vruler, which has a slightly different
            // coordinate system from the canvas.
            event->motion.x -= vruler->get_width() + 2;

            // call the on drawing area event to refresh eveything.
            on_drawing_area_event(event);
        }

        return true;
        break;

    case GDK_BUTTON_RELEASE:
        if (dragging == DRAG_GUIDE && curr_guide_is_x == true) {
            dragging = DRAG_NONE;
            save_meta_data();
        }

        break;
        return true;

    default:
        break;
    }

    return false;
}

void
WorkArea::on_duck_selection_single(const etl::handle<Duck>& duck)
{
    if (dragging == DRAG_NONE) {
        studio::LayerTree* tree_layer(dynamic_cast<studio::LayerTree*>(canvas_view->get_ext_widget("layers_cmp")));
        tree_layer->select_param(duck->get_value_desc());
    }
}

void
WorkArea::refresh_dimension_info()
{
    synfig::RendDesc &rend_desc(get_canvas()->rend_desc());

    canvaswidth = rend_desc.get_br()[0] - rend_desc.get_tl()[0];
    canvasheight = rend_desc.get_br()[1] - rend_desc.get_tl()[1];

    pw = canvaswidth / w;
    ph = canvasheight / h;

    scrollx_adjustment->set_page_increment(abs(get_grid_size()[0]));
    scrollx_adjustment->set_step_increment(abs(pw));
    scrollx_adjustment->set_lower(-abs(canvaswidth));
    scrollx_adjustment->set_upper(abs(canvaswidth));
    scrolly_adjustment->set_lower(-abs(canvasheight));
    scrolly_adjustment->set_upper(abs(canvasheight));
    scrolly_adjustment->set_step_increment(abs(ph));
    scrolly_adjustment->set_page_increment(abs(get_grid_size()[1]));

    if (drawing_area->get_width() <= 0 || drawing_area->get_height() <= 0 || w == 0 || h == 0) {
        return;
    }

    const synfig::Point focus_point(get_focus_point());
    const synfig::Real x(focus_point[0] / pw + drawing_area->get_width() / 2 - w / 2);
    const synfig::Real y(focus_point[1] / ph + drawing_area->get_height() / 2 - h / 2);

    window_tl[0] = rend_desc.get_tl()[0] - pw * x;
    window_br[0] = rend_desc.get_br()[0] + pw * (drawing_area->get_width() - x - w);

    window_tl[1] = rend_desc.get_tl()[1] - ph * y;
    window_br[1] = rend_desc.get_br()[1] + ph * (drawing_area->get_height() - y - h);

    hruler->set_min(Distance(window_tl[0], Distance::SYSTEM_UNITS).get(App::distance_system, rend_desc));
    hruler->set_max(Distance(window_br[0], Distance::SYSTEM_UNITS).get(App::distance_system, rend_desc));
    vruler->set_min(Distance(window_tl[1], Distance::SYSTEM_UNITS).get(App::distance_system, rend_desc));
    vruler->set_max(Distance(window_br[1], Distance::SYSTEM_UNITS).get(App::distance_system, rend_desc));

    view_window_changed();
}

synfig::Point
WorkArea::screen_to_comp_coords(synfig::Point pos)const
{
    synfig::RendDesc &rend_desc(get_canvas()->rend_desc());
    Vector focus_point = get_focus_point();
    synfig::Vector::value_type x = focus_point[0] / pw + drawing_area->get_width() / 2 - w / 2;
    synfig::Vector::value_type y = focus_point[1] / ph + drawing_area->get_height() / 2 - h / 2;

    return rend_desc.get_tl() - synfig::Point(pw * x, ph * y) + synfig::Point(pw * pos[0], ph * pos[1]);
}

synfig::Point
WorkArea::comp_to_screen_coords(synfig::Point /*pos*/)const
{
    synfig::warning("WorkArea::comp_to_screen_coords: Not yet implemented");
    return synfig::Point();
}

synfig::VectorInt
WorkArea::get_windows_offset() const
{
    const synfig::Vector focus_point(get_focus_point());

    // Calculate the window coordinates of the top-left
    // corner of the canvas.
    const synfig::Vector::value_type
    x(focus_point[0] / pw + drawing_area->get_width() / 2 - w / 2),
    y(focus_point[1] / ph + drawing_area->get_height() / 2 - h / 2);

    return VectorInt(int(x), int(y));
}

synfig::RectInt
WorkArea::get_window_rect(int stepx, int stepy) const
{
    VectorInt offset = get_windows_offset();

    RectInt rect(
        -offset[0],
        -offset[1],
        -offset[0] + drawing_area->get_width(),
        -offset[1] + drawing_area->get_height());

    rect.minx = rect.minx < 0 ? ((rect.minx + 1) / stepx - 1) * stepx : rect.minx / stepx * stepx;
    rect.maxx = rect.maxx < 0 ? rect.maxx / stepx * stepx : ((rect.maxx - 1) / stepx + 1) * stepx;
    rect.miny = rect.miny < 0 ? ((rect.miny + 1) / stepy - 1) * stepy : rect.miny / stepy * stepy;
    rect.maxy = rect.maxy < 0 ? rect.maxy / stepy * stepy : ((rect.maxy - 1) / stepy + 1) * stepy;

    etl::set_intersect(rect, rect, RectInt(0, 0, w, h));
    return rect;
}

#ifdef SINGLE_THREADED
/* resize bug workaround */
gboolean
WorkArea::__refresh_second_check(gpointer data)
{
    WorkArea *work_area(static_cast<WorkArea*>(data));
    work_area->refresh_second_check();
    return 0;
}

void
WorkArea::refresh_second_check()
{
    // resize_timeout_connect.disconnect();
    int width = canvas_view->get_width();
    int height = canvas_view->get_height();

    if (width == old_window_width && height == old_window_height) {
        queue_draw();
        // GdkEventExpose event;
    }
}
#endif

bool
WorkArea::refresh(const Cairo::RefPtr<Cairo::Context> &cr)
{
#ifdef SINGLE_THREADED

    /* resize bug workaround */
    if (App::single_threaded) {
        int width;
        int height;
        bool resize_in_progress;
        resize_in_progress = false;
        width = canvas_view->get_width();
        height = canvas_view->get_height();

        if (width != old_window_width || height != old_window_height) {

            resize_in_progress = true;

            // queue second check
            int func_id;
            func_id = g_timeout_add_full(
                          G_PRIORITY_DEFAULT,	// priority -
                          200,			// interval - the time between calls to the function, in milliseconds (1/1000ths of a second)
                          __refresh_second_check,	// function - function to call
                          this,				// data     - data to pass to function
                          NULL);				// notify   - function to call when the idle is removed, or NULL
        }

        old_window_width = width;
        old_window_height = height;

        if (resize_in_progress) {
            if (get_updating()) {
                stop_updating();
            }

            return true;
        }
    }

#endif

    assert(get_canvas());

    // Check if the window we want draw is ready
    Glib::RefPtr<Gdk::Window> draw_area_window = drawing_area->get_window();

    if (!draw_area_window) {
        return false;
    }


    const synfig::Vector focus_point(get_focus_point());

    // Update the old focus point
    last_focus_point = focus_point;

    // Draw out the renderables
    {
        std::set<etl::handle<WorkAreaRenderer> >::iterator iter;

        for (iter = renderer_set_.begin(); iter != renderer_set_.end(); ++iter) {
            if ((*iter)->get_enabled())
                (*iter)->render_vfunc(
                    draw_area_window,
                    Gdk::Rectangle(0, 0, draw_area_window->get_width(), draw_area_window->get_height())
                );
        }
    }

    // Calculate the window coordinates of the top-left
    // corner of the canvas.
    // const synfig::Vector::value_type


    // If we are in animate mode, draw a red border around the screen
    if (canvas_interface->get_mode()&synfigapp::MODE_ANIMATE) {
// #define USE_FRAME_BACKGROUND_TO_SHOW_EDIT_MODE
#ifdef USE_FRAME_BACKGROUND_TO_SHOW_EDIT_MODE
        // This method of drawing the red border doesn't work on any
        // Gtk theme which uses the crux-engine, hcengine, industrial,
        // mist, or ubuntulooks engine, such as the default ubuntu
        // 'Human' theme.
        drawing_frame->modify_bg(Gtk::STATE_NORMAL, Gdk::Color("#FF0000"));
#else
        // So let's do it in a more primitive fashion.
        Cairo::RefPtr<Cairo::Context> cr = draw_area_window->create_cairo_context();
        cr->save();

        cr->set_source_rgb(1, 0, 0);
        cr->set_line_cap(Cairo::LINE_CAP_BUTT);
        cr->set_line_join(Cairo::LINE_JOIN_MITER);
        cr->set_antialias(Cairo::ANTIALIAS_NONE);
        cr->set_line_width(10);

        cr->rectangle(
            0, 0, // x,y
            drawing_area->get_width(), drawing_area->get_height() // w,h
        );
        cr->stroke();
        cr->restore();
#endif
    }

#ifdef USE_FRAME_BACKGROUND_TO_SHOW_EDIT_MODE
    else {
        drawing_frame->unset_bg(Gtk::STATE_NORMAL);
    }

#endif

    return true;
}

void
WorkArea::done_rendering()
{
    /*
    	assert(buffer);
    	assert(w>0);
    	assert(h>0);
    	pix_buf=Gdk::Pixbuf::create_from_data(
    		buffer,	// pointer to the data
    		Gdk::COLORSPACE_RGB, // the colorspace
    		true, // has alpha?
    		8, // bits per sample
    		w,	// width
    		h,	// height
    		w*bpp);	// stride (pitch)
    	assert(pix_buf);
    */
}

String
WorkArea::get_renderer() const
{
    if (get_low_resolution_flag()) {
        String renderer = etl::strprintf("software-low%d", get_low_res_pixel_size());

        if (synfig::rendering::Renderer::get_renderers().count(renderer)) {
            return renderer;
        }
    }

    return App::workarea_renderer;
}

void
WorkArea::set_quality(int x)
{
    if (x == quality) {
        return;
    }

    quality = x;
    queue_render_preview();
}

void
WorkArea::set_low_res_pixel_size(int x)
{
    if (x == low_res_pixel_size) {
        return;
    }

    low_res_pixel_size = x;
    queue_render_preview();
}

namespace studio
{
class WorkAreaProgress : public synfig::ProgressCallback
{
    WorkArea *work_area;
    ProgressCallback *cb;

public:

    WorkAreaProgress(WorkArea *work_area, ProgressCallback *cb):
        work_area(work_area), cb(cb)
    {
        assert(cb);
    }

    virtual bool
    task(const std::string &str)
    {
        if (work_area->dirty) {
            return false;
        }

        return cb->task(str);
    }

    virtual bool
    error(const std::string &err)
    {
        if (work_area->dirty) {
            return false;
        }

        return cb->error(err);
    }

    virtual bool
    amount_complete(int current, int total)
    {
        if (work_area->dirty) {
            return false;
        }

        return cb->amount_complete(current, total);
    }
};
}

bool
studio::WorkArea::async_update_preview()
{
#ifdef SINGLE_THREADED

    if (get_updating()) {
        stop_updating();
        queue_render_preview();
        return false;
    }

#endif

    async_renderer = 0;

    queued = false;
    canceled_ = false;
    get_canvas_view()->reset_cancel_status();

    // This object will mark us as busy until
    // we are done.
    // studio::App::Busy busy;


    if (!get_visible()) {
        return false;
    }

    /*
    // If we are queued to render the scene at the next idle
    // go ahead and de-queue it.
    if(render_idle_func_id)
    {
    	g_source_remove(render_idle_func_id);
    	// queued=false;
    	render_idle_func_id=0;
    }
    */

    dirty = false;
    get_canvas_view()->reset_cancel_status();

    // bool ret=false;
    RendDesc desc = get_canvas()->rend_desc();

    int w = (int)(desc.get_w() * zoom);
    int h = (int)(desc.get_h() * zoom);

    // ensure that the size we draw is at least one pixel in each dimension
    int min_size = low_resolution ? low_res_pixel_size : 1;

    if (w < min_size) {
        w = min_size;
    }

    if (h < min_size) {
        h = min_size;
    }

    // Setup the description parameters
    desc.set_antialias(1);
    desc.set_time(cur_time);
    desc.set_render_excluded_contexts(true);

    set_rend_desc(desc);

    // Create the render target
    handle<Target> target;

    // do a tile render
    handle<WorkAreaTarget> trgt(new class WorkAreaTarget(this, w, h, 2048, 2048, false));

    trgt->set_rend_desc(&desc);
    trgt->set_onion_skin(get_onion_skin(), onion_skins);
    trgt->set_engine(get_renderer());
    target = trgt;

    // We can rest assured that our time has already
    // been set, so there is no need to have to
    // recalculate that over again.
    // UPDATE: This is kind of needless with
    // the way that time is handled now in SYNFIG.
    async_renderer = new AsyncRenderer(target);
    async_renderer->signal_finished().connect(
        sigc::mem_fun(this, &WorkArea::async_update_finished)
    );

    rendering = true;
    synfig::ProgressCallback *cb = get_canvas_view()->get_ui_interface().get();
    cb->task(_("Rendering..."));

    async_renderer->start();

    return true;
}

void
studio::WorkArea::async_update_finished()
{
    synfig::ProgressCallback *cb = get_canvas_view()->get_ui_interface().get();

    rendering = false;

    if (!async_renderer) {
        return;
    }

    // If we completed successfully, then
    // we aren't dirty anymore
    if (async_renderer->has_success()) {
        Real execution_time = async_renderer->get_execution_time();

        if (execution_time > 0.0) {
            cb->task(strprintf("%s %f (%f) %s",
                               _("Rendered:"),
                               async_renderer->get_execution_time(),
                               async_renderer->get_execution_clock(),
                               _("sec")));
        } else {
            cb->task(_("Idle"));
        }

    } else {
        dirty = true;
        cb->task(_("Render Failed"));
    }

    done_rendering();
}

bool
studio::WorkArea::sync_update_preview()
{

    canceled_ = false;
    get_canvas_view()->reset_cancel_status();

    async_renderer = 0;

again:
    // This object will mark us as busy until
    // we are done.
    studio::App::Busy busy;

    WorkAreaProgress callback(this, get_canvas_view()->get_ui_interface().get());
    synfig::ProgressCallback *cb = &callback;

    // We don't want to render if we are already rendering
    if (rendering) {
        dirty = true;
        return false;
    }

    if (!get_visible()) {
        return false;
    }

    get_canvas()->set_time(get_time());
    get_canvas_view()->get_smach().process_event(EVENT_REFRESH_DUCKS);
    signal_rendering()();

    // If we are queued to render the scene at the next idle
    // go ahead and de-queue it.
    if (render_idle_func_id) {
        g_source_remove(render_idle_func_id);
        // queued=false;
        render_idle_func_id = 0;
    }

    // Start rendering
    rendering = true;

    dirty = false;
    get_canvas_view()->reset_cancel_status();

    RendDesc desc = get_canvas()->rend_desc();

    int w = (int)(desc.get_w() * zoom);
    int h = (int)(desc.get_h() * zoom);

    // Setup the description parameters
    desc.set_antialias(1);
    desc.set_time(cur_time);

    set_rend_desc(desc);

    // Create the render target
    handle<WorkAreaTarget> target = new WorkAreaTarget(this, w, h, 2048, 2048, true);
    target->set_rend_desc(&desc);
    target->set_engine(get_renderer());

    // We can rest assured that our time has already
    // been set, so there is no need to have to
    // recalculate that over again.
    target->set_avoid_time_sync(true);

    if (cb) {
        cb->task(strprintf(_("Rendering canvas %s..."), get_canvas()->get_name().c_str()));
    }

    bool ret = target->render(cb);

    if (!ret && !get_canvas_view()->get_cancel_status() && dirty) {
        rendering = false;
        // canceled_=true;
        goto again;
    }

    if (get_canvas_view()->get_cancel_status()) {
        canceled_ = true;
    }

    if (cb) {
        if (ret) {
            cb->task(_("Idle"));
        } else {
            cb->task(_("Render Failed"));
        }

        cb->amount_complete(0, 1);
    }

    // Refresh the work area to make sure that
    // it is being displayed correctly
    drawing_area->queue_draw();

    // If we completed successfully, then
    // we aren't dirty anymore
    if (ret) {
        dirty = false;
        // queued=false;
    } else {
        dirty = true;
    }

    rendering = false;
    done_rendering();
    return ret;
}

void
studio::WorkArea::async_render_preview(synfig::Time time)
{
    cur_time = time;

    refreshes += 5;

    if (!get_visible()) {
        return;
    }

    get_canvas()->set_time(get_time());
    get_canvas_view()->get_smach().process_event(EVENT_REFRESH_DUCKS);
    signal_rendering()();

    async_update_preview();
}
void
WorkArea::async_render_preview()
{
    return async_render_preview(get_canvas_view()->get_time());
}

bool
studio::WorkArea::sync_render_preview(synfig::Time time)
{
    cur_time = time;
    refreshes += 5;

    if (!get_visible()) {
        return false;
    }

    return sync_update_preview();
}

bool
WorkArea::sync_render_preview()
{
    return sync_render_preview(get_canvas_view()->get_time());
}

void
WorkArea::sync_render_preview_hook()
{
    sync_render_preview(get_canvas_view()->get_time());
}

void
WorkArea::queue_scroll()
{
    // Check if the window we want draw is ready
    Glib::RefPtr<Gdk::Window> draw_area_window = drawing_area->get_window();

    if (!draw_area_window) {
        return;
    }

    const synfig::Point focus_point(get_focus_point());

    const synfig::Real
    new_x(focus_point[0] / pw + drawing_area->get_width() / 2 - w / 2),
          new_y(focus_point[1] / ph + drawing_area->get_height() / 2 - h / 2);

    const synfig::Real
    old_x(last_focus_point[0] / pw + drawing_area->get_width() / 2 - w / 2),
          old_y(last_focus_point[1] / ph + drawing_area->get_height() / 2 - h / 2);

    // If the coordinates didn't change, we shouldn't queue a draw
    if (old_x == new_x && old_y == new_y) {
        return;
    }

    const int
    dx(round_to_int(old_x) - round_to_int(new_x)),
    dy(round_to_int(old_y) - round_to_int(new_y));

    draw_area_window->scroll(-dx, -dy);

    if (timecode_width && timecode_height) {
        drawing_area->queue_draw_area(timecode_x,    timecode_y,    timecode_x + timecode_width,    timecode_y + timecode_height);
        drawing_area->queue_draw_area(timecode_x - dx, timecode_y - dy, timecode_x - dx + timecode_width, timecode_y - dy + timecode_height);
    }

    if (bonesetup_width && bonesetup_height) {
        drawing_area->queue_draw_area(bonesetup_x,    bonesetup_y,    bonesetup_x + bonesetup_width,    bonesetup_y + bonesetup_height);
        drawing_area->queue_draw_area(bonesetup_x - dx, bonesetup_y - dy, bonesetup_x - dx + bonesetup_width, bonesetup_y - dy + bonesetup_height);
    }

#ifndef USE_FRAME_BACKGROUND_TO_SHOW_EDIT_MODE

    if (canvas_interface->get_mode()&synfigapp::MODE_ANIMATE) {
        int maxx = drawing_area->get_width() - 1;
        int maxy = drawing_area->get_height() - 1;

        if (dx > 0) {
            drawing_area->queue_draw_area(0, 0,       1, maxy);
            drawing_area->queue_draw_area(maxx - dx, 0, maxx - dx, maxy);
        } else if (dx < 0) {
            drawing_area->queue_draw_area(maxx, 0,    maxx, maxy);
            drawing_area->queue_draw_area(-dx, 0,     -dx, maxy);
        }

        if (dy > 0) {
            drawing_area->queue_draw_area(0,       0, maxx,       1);
            drawing_area->queue_draw_area(0, maxy - dy, maxx, maxy - dy);
        } else if (dy < 0) {
            drawing_area->queue_draw_area(0,    maxy, maxx,    maxy);
            drawing_area->queue_draw_area(0,     -dy, maxx,     -dy);
        }
    }

#endif // USE_FRAME_BACKGROUND_TO_SHOW_EDIT_MODE

    last_focus_point = focus_point;
}

void
studio::WorkArea::zoom_in()
{
    set_zoom(zoom * 1.25);
}

void
studio::WorkArea::zoom_out()
{
    set_zoom(zoom / 1.25);
}

void
studio::WorkArea::zoom_fit()
{
    float new_zoom(min(drawing_area->get_width() * zoom / w,
                       drawing_area->get_height() * zoom / h) * 0.995);

    if (zoom / new_zoom > 0.995 && new_zoom / zoom > 0.995) {
        set_zoom(prev_zoom);
        return set_focus_point(previous_focus);
    }

    previous_focus = get_focus_point();
    prev_zoom = zoom;
    set_zoom(new_zoom);
    set_focus_point(Point(0, 0));
}

void
studio::WorkArea::zoom_norm()
{
    if (zoom == 1.0) {
        return set_zoom(prev_zoom);
    }

    prev_zoom = zoom;
    set_zoom(1.0f);
}

void
studio::WorkArea::zoom_edit()
{
    set_zoom(zoomdial->get_zoom(zoom));
}

gboolean
studio::WorkArea::__render_preview(gpointer data)
{
    WorkArea *work_area(static_cast<WorkArea*>(data));

    // there's no point anyone trying to cancel the timer now - it's gone off already
    work_area->render_idle_func_id = 0;

    work_area->queued = false;
    work_area->async_render_preview(work_area->get_canvas_view()->get_time());

    return 0;
}

void
studio::WorkArea::queue_render_preview()
{

    if (queued == true) {
        return;
        /*		if(render_idle_func_id)
        	g_source_remove(render_idle_func_id);
        render_idle_func_id=0;
        queued=false;
        */
    }

    if (dirty_trap_enabled) {
        dirty_trap_queued++;
        return;
    }

    int queue_time = 50;

    if (rendering) {
        queue_time += 250;
    }

    if (queued == false) {
        queued = true;
        // render_idle_func_id=g_idle_add_full(G_PRIORITY_DEFAULT,__render_preview,this,NULL);
        render_idle_func_id = g_timeout_add_full(
                                  G_PRIORITY_DEFAULT,	// priority -
                                  queue_time,			// interval - the time between calls to the function, in milliseconds (1/1000ths of a second)
                                  __render_preview,	// function - function to call
                                  this,				// data     - data to pass to function
                                  NULL);				// notify   - function to call when the idle is removed, or NULL
    }

}

DirtyTrap::DirtyTrap(WorkArea *work_area): work_area(work_area)
{
    work_area->dirty_trap_enabled = true;

    work_area->dirty_trap_queued = 0;
}

DirtyTrap::~DirtyTrap()
{
    work_area->dirty_trap_enabled = false;

    if (work_area->dirty_trap_queued) {
        work_area->queue_render_preview();
    }
}

void
studio::WorkArea::queue_draw_preview()
{
    drawing_area->queue_draw();
}

void
studio::WorkArea::set_cursor(const Glib::RefPtr<Gdk::Cursor> &x)
{
    // Check if the window we want draw is ready
    Glib::RefPtr<Gdk::Window> draw_area_window = drawing_area->get_window();

    if (!draw_area_window) {
        return;
    }

    draw_area_window->set_cursor(x);
}
void
studio::WorkArea::set_cursor(Gdk::CursorType x)
{
    // Check if the window we want draw is ready
    Glib::RefPtr<Gdk::Window> draw_area_window = drawing_area->get_window();

    if (!draw_area_window) {
        return;
    }

    draw_area_window->set_cursor(Gdk::Cursor::create(x));
}

// #include "iconcontroller.h"
void
studio::WorkArea::refresh_cursor()
{
}

void
studio::WorkArea::reset_cursor()
{
    // Check if the window we want draw is ready
    Glib::RefPtr<Gdk::Window> draw_area_window = drawing_area->get_window();

    if (!draw_area_window) {
        return;
    }

    draw_area_window->set_cursor(Gdk::Cursor::create(Gdk::TOP_LEFT_ARROW));
}

void
studio::WorkArea::set_zoom(float z)
{
    z = max(1.0f / 128.0f, min(128.0f, z));
    zoomdial->set_zoom(z);

    if (z == zoom) {
        return;
    }

    zoom = z;

    refresh_dimension_info();

    refreshes += 5;
    async_update_preview();

    // TODO: FIXME: QuickHack
    if (canvas_view->get_smach().get_state_name() != std::string("polygon")
            && canvas_view->get_smach().get_state_name() != std::string("bline")) {
        canvas_view->queue_rebuild_ducks();
    }
}

void
WorkArea::set_selected_value_node(etl::loose_handle<synfig::ValueNode> x)
{
    if (x != selected_value_node_) {
        selected_value_node_ = x;
        queue_draw();
    }
}

void
WorkArea::insert_renderer(const etl::handle<WorkAreaRenderer> &x)
{
    renderer_set_.insert(x);
    x->set_work_area(this);
    queue_draw();
}

void
WorkArea::insert_renderer(const etl::handle<WorkAreaRenderer> &x, int priority)
{
    x->set_priority(priority);
    insert_renderer(x);
}

void
WorkArea::erase_renderer(const etl::handle<WorkAreaRenderer> &x)
{
    x->set_work_area(0);
    renderer_set_.erase(x);
    queue_draw();
}

void
WorkArea::resort_render_set()
{
    std::set<etl::handle<WorkAreaRenderer> > tmp(
        renderer_set_.begin(),
        renderer_set_.end()
    );
    renderer_set_.swap(tmp);
    queue_draw();
}

WorkArea::PushState::PushState(WorkArea *workarea_):
    workarea_(workarea_)
{
    type_mask = workarea_->get_type_mask();
    allow_duck_clicks = workarea_->get_allow_duck_clicks();
    allow_bezier_clicks = workarea_->get_allow_bezier_clicks();
    allow_layer_clicks = workarea_->get_allow_layer_clicks();
    needs_restore = true;
}

WorkArea::PushState::~PushState()
{
    if (needs_restore) {
        restore();
    }
}

void
WorkArea::PushState::restore()
{
    workarea_->set_type_mask(type_mask);
    // update the toggle buttons for the duck types
    workarea_->get_canvas_view()->toggle_duck_mask(Duck::TYPE_NONE);
    workarea_->set_allow_duck_clicks(allow_duck_clicks);
    workarea_->set_allow_bezier_clicks(allow_bezier_clicks);
    workarea_->set_allow_layer_clicks(allow_layer_clicks);
    needs_restore = false;
}